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As the Computer Age gathers momentum, more and more people are becoming aware 
of the latest dramatic development: the microcomputer. To take full advantage of these 
incredibly powerful new tools, you need to be able to write programs. The easiest and most 
effective way to learn programming is by actually using the computer yourself, to get 
"hands-on" experience. 

This manual is designed to help you learn computer programming on the Video Genie 
System Computer, using the "hands-on" approach. It provides a comprehensive software 
course, based on the Active Commands, Text Editing and program statements available 
in the Video Genie System's powerful Level H BASIC language. 

To get the most from the manual, we suggest very strongly that you read it from the 
first page to the last, without skipping any portion of the text or any of the numerous 
examples given. Not only that, but we suggest that you try each example for yourself on 
the Video Genie System computer as you go along. That way, you should really have a 
good grasp of programming by the time you reach the last page. 



Happy and effective computing with your Video Genie System! 
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NTRODUCTION 



In the Video Genie System, there are four operating levels: 

(1) The Active Command Level: In this level, the computer responds to commands as 
soon as they are entered followed by hitting the NEW LINE key. Whenever the >_ 
signs are on the display, the user is in the Active Command level. (For more details 
see Chapter 1). 

(2) The Program Execution level: This level is entered by typing RUN, and the BASIC 
program in the memory is executed. All numeric variables are set to zero and all string 
variables are set to null before execution starts, that is right after the RUN command 
is entered. (For more detail see the RUN command in Chapter 1 ). 

(3) The Text Editing level: This level allows the user to modify, delete and add the 
content of the program in the memory. The user can change any part of the program 
text as desired, instead of retyping the entire program line. 

(see Chapter 2). 

(4) The Monitor level: This level permits the user to load machine language "object files" 
into memory. These object files (either program or data) can be accessed by other 
BASIC programs, or executed independently. 

(see the SYSTEM command in Chapter 1 ). 



Before going into program coding, we should be familiar with some basic concepts of 
programming. 

1 . Keywords: There is a set of keywords (reserved words which form the skeleton of a 
program in Extended Basic. Some of the keywords are: 

PRINT 

INPUT 

IF 

THEN 

GOTO 

END 

For the entire list of keywords, please refer to Appendix A. The keywords act as the guide- 
line of a program. 



For example 



I 1 

I — 10 p PRINT "ADD TWO NUMBERS PROGRAM : " 

20 rJ- INPUT "ENTER THE FIRST NUMBER "; R 
i i 



36 
40 

SO 



— 60 ~L 



■- INPUT "ENTER THE SECOND NUMBER ■; B 

I 



C = A + B 

PRINT "THE RESULT IS : "i C 

END < 



LINE NOS. 



KEYWORDS 



SECONDARY PART OF STATEMENTS 



All this program does is to accept two numbers, add them together, and print out the result, 

READY 
>RUN 

ADD TWO NUMBERS PROGRAM : 
ENTER THE FIRST NUMBER ? 42 
ENTER THE SECOND NUMBER ? 45 
THE RESULT IS ; 87 

2. Variables: Do you remember your mail box number? 

Of course, right! The mail box number serves as a label which identifies itself from the 
others, so the postman can put the right letter to the right box. 

The variable names (or identifiers) in a program function exactly like the mail box number. 
However, the variables use figurative names instead of numbers. 

Let us consider the following events: 
A=170 




variable 
name 



taj 




Cb) 



In event (a), when the computer executes the assignment statement A = 170, it searches the 
location of variable A, and put the value of 170 into A's content. Just like in event (b), once 
the postman sees the address on the letter, he will bring the letter to the mail box 456, in 
ELM street. Simple, right! 



With the same process, consider the following program. 

10 ft = 1 :REM FILL THE CONTENT OF H WITH 1. 

29 fl - A + 1© :REM ADD 10 TO R, STORE THE RESULT IN Pi. 

30 B = fl * 2 :REM fl X 2, STORE THE RESULT IN B. 
40 PRINT "THE RESULTS RRE : "; A, B 

50 END :REM END OF PROGRAM. 



A 11 



line 10 
line 20 
line 30 

READY 
>RUN 

THE RESULTS ARE : 11 



A 


11 


B 


22 



22 



So far we only deal with variables that contain numbers; actually, variables may contain 
strings (one or more characters). 

However, these variables are a little bit different from numeric variables. 



10 A$ - "MR. JOHN ADAMS, " 

20 B$ = "P. 0. BOX 456, " 

20 C$ = "ELM STREET. " 

40 PRINT A$ 

50 PRINT B$; C$ 

60 END 



READY 
>RUN 



MR. JOHN ADAMS, 

P. 0. BOX 456, ELM STREET. 



This program assigns "MR. JOHN ADAMS,", "P.O. BOX 456,", "ELM STREET." to A$, 
B$, C$ respectively. Then print out the contents of A$, B$ and C$ onto the screen. 
Note that there is a $ sign following A, B and C. The "$" tells the computer that vari- 
ables A$, B$, and C$ are string variables (variables that contain letters, symbols, as well as 
non - computational numbers). The value must be enclosed in double quotation marks. For 
example: D$ = "ABCDE 12345 * = /+" 

Note that if you assign the wrong thing to the wrong variable, the computer will not under- 
stand and will give you an error message. 

For example: 

A = "WRONG DATA" (assign a string value to a numeric variable) 

B$ = 1 00 (assign a numeric value to a string variable) 

Besides, variable names must be unique. Just like two mail boxes cannot bear the same 
number. 

The Video Genie System accepts variable names which are longer than two characters; 
however, only the first two characters are used by the computer to distinguish between 
other variables. Variable names must begin with a letter (from A to Z) and followed by 
another letter or a digit (from to 9). The following are valid and distinct variables: 

A, AA, AB, AC, A0, Al , BN, BZ, B7, ZZ, Zl . 

Note: The user should not use any variable name which contains words with special meaning 
(or reserved words) in the BASIC language. For example, "CIF" cannot be used as a variable 
name, since it contains the BASIC keyword "IF". 
A list of reserved words is in Appendix A. 
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Variable Types 

There are four types of variables in the Video Genie System: integer, single precision, double 
precision, and string variables. The first three types are used to store numeric values, 
whereas the last type is used only for character storage. 

1. %: integer (whole numbers within the range -32769 to +32769) 

Example 

A% = - 30 
BB% = 8000 

2. ! : single precision (6 significant digits) 

Example 

A! =-50.3 
D4! = .123456 

3. *# : double precision (16 significant digits) 

Example 

A#= 3.141592653589 
A2#= -4567.8901234 

4. $ : string (maximum length : 255 characters) 

Example 

A$ = "VIDEO GENIE SYSTEM" 

M2$ = 'THE RESULT OF (A*B+15)/2.5 IS:" 

Though A%, A!, A# , A$ all have the same variable name "A", their types are different, 
that is %,!,#, $; they are considered to be distinct variables by the computer. 

Artithmetic Operators 

Whenever any computation is needed in a program the arithmetic operators are used. 

Example: 

5 R = 6 

16 fl = R * 3.1416 * 2 :REM COMPUTE THE CIRCUMFERENCE. 

26 PRINT "THE CIRCUMFERENCE IS : "; A 

36 B = 3.1416 * R [ 2 :REM COMPUTE THE AREA OF THE CIRCLE. 
46 PRINT "THE AREA IS : :"; B 
56 END 

READV 
>RUN 

THE CIRCUMFERENCE IS : 37. 6992 
THE AREA IS : 113. 698 



The Video Genie System uses the general arithmetic symbols: 

+ for addition, - for subtraction, * for multiplication, / for division, and [(the ESC key) for 
exponentiation. 

For example, the result of 5 x 12 (1 /3 * is equivalent to the result of 5 * 12 [ d/3) in Video 
Genie System (Note: you will find no [ key on the keyboard, it is represented by the ESC 
key). (\A\u.k/s t .) 

Relational Operators 

Whenever a decision has to be made within a program, a relational operator is needed. 
The acceptable operators are: 

< (less than) < = (less than or equal to) 

> (greater than) > = (greater than or equal to) 

< > (not equal) = (equal to) 

Example: 

126 IF fl < B THEN PRINT "B IS GREATER THAN A. " 

When the computer executes this statement, if the content of B is greater than the content 
of A (i.e. A < B is true), the sentence "B IS GREATER THAN A" will be printed on the 
screen. Otherwise the computer will just go to the next statement. 

Logical Operators 

AND, OR, and NOT are the only logical operators accepted by the Video Genie System. 

Example 

10 IF A = 1 AND B = 5 GOTO 50 

The computer branches to line 50 if A = 1 and B = 5, otherwise the computer goes to the 
next statement following line 10. 
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20 A = <B = 2) AND <C j 10) 

A has the value of -1 , if both B = 2 and C> 1 are true. 
Otherwise A has the value of 0. 



40 R = CD < 2) OR <E < 20) 



A has the value of -1 if either D < 2 or E < 20 is true. When both D > = 2 and E > = 20 are 
true, then A has the value of 0. 



70 fi = NOT <F > 5) 



A has the value of -1 if F < = 5 
Otherwise A has the value of 0. 



String Operators. 

In string operations, the relational operators are used to compare tne precedence of two 
strings. 

Note that the following operations are all true. 

"B" < "C" < THE CODE FOR B IS LESS THAN THE CODE FOR C > 

"JOHN" > "JfiCK" < SRME REASON AS ABOVE. ) 

"STRING" = "STRING" 

"LETTERS" <> "LETTERS " < SPACE ALSO COUNTS. ) 

R$ = "B0" + "AT" < A* WILL HAVE THE VALUE : BOAT ) 



Order of Operations 

Operations in the innermost level of parentheses are performed first, then evaluation 
proceeds to the next level, etc. Operations on the same level are performed according to the 
following precedence rules. 



1 . Exponentiation 

2. Negation 

3. Multiplication and Division 

4. Addition and Subtraction 

5. Relational Operators 

6. Logical Operators 



A [B 

-C 

A*B,C/D 

C+D,E-F 

A<B,"C" = "C\15<> 16 

NOT, AND, OR 
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For example, we have a formula . 

16 flNS = fl + B * C * D / 2 + E [ 2 

The computer will evaluate in the following sequence. 

If A = 2 

B = 3 

C = 4 

D = 5 

E = 6 



Then apply to the formula above 



2 + 3*4*5/2+ 6C2 

u 

12 * 5 



60 / 2 



+ 30 6 C 2 



32 + 36 



68 



Therefore the answer should be 68. 
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CHAPTER 1 



ACTIVE COMMANDS 

Once the system is set up, with power on, the user should be in the Active Command level. 
The normal indication is the word "READY" followed by a " > " sign which appears on 
the next line at the upper left corner on the display (monitor or TV screen). For convenience 
we will call this indication the "ready message". 



At this point, the user should hit the lNEW LINEI key before entering one of the following 
commands through the keyboard. 



1. AUTO 

2. CLEAR 

3. CLOAD 

4. CLOAD? 

5. CONT 

6. CSAVE 

7. DELETE 



8. EDIT 

9. LIST 

10. NEW 

11. RUN 

12. SYSTEM 

13. TROFF 

14. TRON 



15. LLIST 



We are going to discuss these commands separately. Please note that everything inside the 
brackets is optional. For example: AUTO (line number, increment) All the user has to do is 
type in the underlined portion: 

AUTO 16.. 5 

or any numeric value to replace "line number" and "increment". In case the option is not 
taken, just type in 

LIST 

The computer will perform certai n specified ac tions automatically. Notice: Every command 
should be followed by pressing the lNEW LINEI key. 
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1 . 1 AUTO (line number, increment) 

This command automatically sets the line numbers before each source line is entered. 
The option permits the user to specify the beginning line number as well as t he in- 
creme nt desired between lines. Tf the user only types in AUTO followed by the lNEWl 
iLINEl key, the beginning line number will be set at 10, with each increment of 10. 
The user may enter his program statement right after the line number. 



Example 



30 PRINT "THIS IS LINE 30. 



Every time the us er hits th e | NEW LINE [ key, the computer will increment the line 
number. Until the [BREAK | key is hit, the AUTO command will remain in operation. 
(Note that whenever AUTO brings up a line that has been used previously, there will 
be an asterisk a ppear righ t next to the line number. If the user does not want to alter 
that line, hit the lBREAKl kev to turn off the AUTO function). 



Example 

REflDV 
>flUT0 1,2 



1 LINE 1 


NEW LINE 


3 LINE 3 


1 


5 LINE 5 




7 LINE 7 




9|BREAK| 




REflDV 




>flUT0 2, 2 




2 SECOND LINE 


NEW LINE 


4 FORTH LINE 


\ 


6 SIXTH LINE 




8| BREAK | 




REflDV 




>flUT0 




10 LINE 16 


NEW LINE 


20 LINE 20 


1 


30 LINE 30 




40|BREAKj 




REflDV 




>flUT0 1, 1 




1* 


NEW LINE 


2* 


» 


3* 




4* 




5* 
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1.2 CLEAR (number of bytes) 

The command will clear a specific number of bytes for string storage. If the option is 



not used i.e. type in CLEAR followed by the |NEW LINE| key, the computer will 



reset all numeric variables to zero, and all string variables to null. When the option is 
taken, the command will perform, in addition to the first function, a second function: 
that is to clear a specified number of bytes for string storage. Note that when the user 
turns on the computer, a CLEAR 50 command is performed automatically. 

Example 

CLEAR 100 

Reset all numeric variables to zero, and all string variables to null. Then clears 100 
bytes of memory for string storage. 
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1 .3 CLOAD (# - cassette number, "file name") 

The command will load a specified program according to the "file name" to the 
computer from the appropriate cassette. Before using this command, the user should 
re-wind the cassette tape, check the cables and connectors (consult the user's manual), 
press the PLAY button on the cassette. If e verything is ready, type in, for example 
CLOAD # -1, "A" then hitthe lNEW LINE I key. The cassette will be turned on and 
starts searching until the file named "A" is found. If the file is found, a 
stable and a blinking asterisks will appear at the top right corner of the display to 
indicate loading is carrying out. Once the entire program has been loaded in the 
computer, the READY message will appear on the display. 

Example 

CLOflD #-1, "3" 

Load from cassette No. 1 the file named "3". 

Note that only the first character of the file name is used for CLOAD, CLOAD?, and 

CSAVE commands. 

1.4 CLOAD? (file name) 

This command will compare a specific program stored on cassette tape with the one 
in the computer's main memory. Usually, this command is used right after the 
CSAVE command which stores a program from the computer's main memory to a 
cassette. The CLOAD? command allows the user to examine whether the copying 
(CSAVE) operation is successful. 

It is a good practice to include the file name in this command, since the computer will 
search for that file, or program, before comparison , starts. Otherwise the first file 
encountered on the cassette will be compared. During the operation, the program on 
tape and the program in memory are compared byte by byte. If any part does not 
match, the message "BAD" will be display. In this case, the user should repeat the 
CSAVE command again. Same as CLOAD Comm and, the cassette must be re-w ound , 
cables and connectors checked, with the | PLAY] button on; prior hitting the iNEW 
LINEl key. (consult User's Manual for more details). 

1.5 CONT 

This command continu es the pr ogram execution, at the point where the execution 
has been stopped by the lBREAKl key or a STOP statement within the program. 
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1 .6 CSAVE# -cassette number, "file name" 

This command stores the program in the computer's main memory onto cassette tape. 
Both the cassette number and the file name must be accompanied with this command. 
Any alphanumeric character other than double quotes (") will be acceptable as a file 
name. Again, before using the command, the cassette tape must be in a proper start- 
ing location (not overlapped with any useful program location). Check the cables 
and connectors, press the PLAY and REC buttons of the cassette at the same time, 
then start typing the command accordingly. 

Example 

CSfiVE #-2, "C" 

Saves a program with label "C" on cassette drive 2, from the main memory. 
Warning: keep account of the locations of the saved programs on tape. Find an empty 
space for the new program to be loaded, unless you want to erase the old programs. 
Erased program are not recoverable. (Consult user's manual for more details). 



1 .7 DELETE line number (-line number) 

This command will clear the memory location that contains the specified line(s). 

Example 

DELETE 5 Clear line 5 

DELETE 7 - 16 Clear line 7 line, 10 and any line in between. 

DELETE -12 Clear from the first line of the program, up to and including line 12. 

DELETE Clear the line currently entered, or edited. 

1 .8 EDIT line number 

This command will cause the computer to shift from the Active Command level to the 
Editing level. In the Editing level, the user is allowed to examine and modify the pro- 
gram statements in the main memory, by using^a set of sub-commands. There must be 
a valid line number following the EDIT command, otherwise the command may not 
be accepted. Also see Chapter 2. 

Example 

EDIT 20 

Turns the computer from Active Command level to Editing level - then examines 
line 20. 
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1 .9 LIST (line number — line number) 

This command will inform the computer to display any specified program lines stored 
in the main memory. If the option is not used, the computer will scroll the entire 
pro gram on to the display. In order to pause and examine the text, the user should hit 
the lSHIFTI and @ keys simultaneously. The scrolling will continue by hitting any key. 



Example 



LIST 


2 


LIST 


19 - 


LIST 


-56 


LIST 


20 - 


LIST 


> 


LIST 





display line 3. 
20 display line 10, line 20 and any line in between. 

display from the first line up to and include line 50. 
display line 20 and all following lines, 
display the current line just entered or edited, 
display all lines in the memory. 



1.10 NEW 



This command will clear all program lines; reset numeric variables to zero and string 
variables to null. It does not change the memory size previously set by the CLEAR 
command. 



1.11 RUN (line number) 

This command will instruct the computer to start executing (or RUN) the user's pro- 
gram stored in main memory. If a line number is not specified, the computer will 
start executing from the lowest line number. However, if a line number is provided, 
the computer will execute from the given line number to higher order lines. Note 
that an error will occur if an invalid line number is used. 

Every time a RUN is executed, a CLEAR command also executed automatically 
before it. 



Example 



RUN 50 start executing at line 50. 

run start executing at the lowest number line, 
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1.12 SYSTEM 



This command turns the computer into the Monitor Mode. Within this mode, the 
user may load his own program or data file in machine code format. 
To load an object file from tape, type in SYSTEM and (NEW LINE! : the "*?"svmbol 
will be displayed. Then type in the file name. The tape will begin loading. When 
loading is completed, another "*?" will appear. Type in a slash "/" symbol followed 
by the entry point address (in decimal) where the user wants the execution to start. 
If the user does not type in the entry address, execution will begin at the address 
specified by the object file. 



1.13 TROFF 



This command will turn off the Trace function. Usually follows the TRON 
command. 



1.14 TRON 



This command will turn on a Trace function that allows the user to keep track of the 
program flow for debugging and execution analysis. Everytime the computer executes 
a new program line, the line number will be displayed inside a pair of brackets. 



1 +*» 



Example 




Consider the following program: 


10 


PRINT " ** PROGRAM 


28 


fi = 1 


30 


IF fl = 3 THEN 70 


40 


PRINT fl 


50 


fl = fl + 1 


66 


GOTO 30 


70 


PRINT " END PROGRAM 


30 


END 


Type in 




>TRON NEW LINE 






>RUN INEW LINE 



<10> ** PROGRAM 1 +* 
<20X30X40> 1 
<50X60X30X40> 2 
<50X60X30X70> END PROGRAM 1. 
<80> 
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In order to pause execution before its natural end, the lSHIFT land @ keys must be 
pressed simultaneously. To continue, just press any key. 

To turn off the Trace function, enter TROFF. TRON and TROFF are available for 
use within user programs to check if a given line is executed. 

Example 



99 IF fl = B THEN 160 

100 TRON 

110 fl = B + C 
120 TROFF 



In this portion of a program, if A happens to be not equal to B, then line 1 10 should 
be executed. By using TRON and TROFF inside the program, the user can see 
precisely whether line 1 10 has been executed or not. The computer will display <1 10> 
<120>if these lines were executed. TRON and TROFF can be removed after a pro- 
gram is debugged. 



1.15 LLIST 

Lists a program onto the printer. This command functions in a very similar way as 
the LIST command. If the Line printer is not properly connected, the computer will 
enter a dead loop and waits to print the first character. This situation can only be 
resolved by turning the printer on or hitting the RESET button. 
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CHAPTER 2 



TEXT EDITING 

The purpose of editing in the Video Genie System is to facilitate the user in modifying his 
programs. With the Editor, the user need not to type in the entire program every time he 
makes a programming mistake or typing error. The need for an editor becomes more 
critical when programs are long and complex. 

Inside this chapter we discuss every editing function, including subcommands, that avail- 
able for the Video Genie System. A substantial amount of descriptive examples are present- 
ed with each command. Users are advised to try out each editing command before entering 
their first program into the system. 

2.1 EDIT line number 

This command shifts the computer from the Active Command level to the Editing 
level. The user must specify which line he wants to edit. If the line number is not pro- 
vided, an FC error will occur (see Appendix B). 

Example 

EDIT 106 (allow to edit line 100) 

EDIT* (allow to edit the current line just entered.) 



2.2 NEW LINE 1 Key 



Once the user presses the lNEW LINE] key while in the Edit mode, the computer will 
record all the changes made in that line, and return back to the Active Command level. 



2.3 



Space-bar Key 



In the Edit mode, pressing the space-bar will move the cursor one space to the right 

and display any character stored in the preceding position. The user may type in the 

value of n before hitting the Space-bar, then the cursor will move n spaces to the right 

side. 

Suppose we have entered a line into the computer by the command : 



>flUT0 106 

100 IF R = B THEN 150 



fl = R + 1 : GOTO 190 
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, If the , user wants to edit this line, he should type in EDIT 100 followed by thefNEWl 
ILINEI kev. like the following: 



>EDIT 160 



then the display will become: 

±80- 
By pressing the Space-bar 12 times, the cursor will move to the right side by 12 
spaces. The display should look like: 

100 IF ft = B THE- 

The user may also use the option to display more c haracters a t once. That is, enter 
the number of cursor spaces desired, before hitting thelSpace-blrl 



Example 

Type in 8 followed by the|Space-bar)key 



100 IF fl = B THE- 
The display will become 

100 IF fl = B THEN 150 : _ 



If the user wants to display the next 20 positions, he may type 20 then the I Space-bai 
again. The outcome should be: ' 



100 IF fl = B THEN 150 : ft = fl + 1 : GOTO 100 _ 



2.4 n Backspace Key 



This action will move the cursor back to the left by n spaces. If number n is not 
specified, the cursor only moves back one space at a time. Everything behind the 
cursor will disappear from the display; however, it is not erased from the memory. 

Example 

100 IF fl = B THEN 150 : fl = fl + 1 : GOTO 100 



Hit the Backspace key 5 times, the display will look like 



100 IF fl = B THEN 150 : ft = fl + 1 : GOT. 
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Then type in 10 followed by Backspace key, the display will look like 
106 IF ft = B THEN 150 : A = ft - 



After this sequence of operations, if the user hits the ^NEW LINE| key, the display 
will look like: 

> - 
That means the computer has returned back to the Active Command level. If any 
further change is desired in line 100, the user must enter the Edit mode again. 



2.5 SHIFT ESC Key 



By pressing the [SHIFT] and [ESC] keys simultaneously, the computer will escape from 
any of the following Insert subcommands: H, I, X. After escaping from an Insert sub- 
command, the user remains in the Editing level, while the current cursor position is 
unchanged. Another way to escape from these Insert subcommands, is by pressing the 
INEW LINEl key, which will shift the computer back to the Active Command level. 



2.6 HT1 Key 



"H" represents Hack and Insert; that is to delete remainder of the line and to let the 
user insert material at the current cursor position. 

Example 
Consider this line: 

100 IF ft = B THEN 150 : R = ft + 1 : GOTO 100 

If the user wants to replace A = A + 1 by A = A + B, and to delete GOT O 100, he 
should first enter the Editing level, type in 25 followed by pressing the | Space-bar 
(move 25 spaces from the beginning of the line). The display should look like: 



100 IF ft = B THEN 150 



ft- 
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Now hit the H key t ype in + B, then hit [NEW LINE| (back to the Active Command 
level). Or hit |SHIFT| and |ESC| simultaneously to return to Editing level, then hit IS to 
display the entire line, as below: 

100 IF ft = B THEN 150 : fl = ft + B 

100- 

with anything not displayed being deleted. 



2.7 \T\Key 



"I" represents Insert, that is to allow insertion of characters starting at the current 
cursor position, without altering any other part of the line. 

Example 

We want to insert the statement "PRINT A" between "A = A + 1 " and "GOTO 100" 
in line 100. Line 100 looks like: 

160 IF ft = B THEN 150 : fi = fl + 1 : GOTO 100 



By using the EDIT mode and the Space-bar Move the cursor to 



100 IF fl = B THEN 150 : ft = fl + 1 :- 



Now hit the I key, type in "PRINT A : ", then press the|SfflFT]and [ESCjkey s to escape 
from the subcommand level. At this point we can type in[T]to list the current line. 
And the display should look like: 



100 IF fl = B THEN 150 : fl = fl + 1 : PRINT fl : GOTO 100 

100 _ 



or we can hit the [NEW LINE key to return to the Active Command level. 



2.8 X Key 



"X" represents Insert at End of Line. The command moves the cursor position to the 
end of the line, and shifts the computer into the Insert subcommand. The user can 
ins ert new ma terials at the end of the line, or delete part of the existing line by using 
the [Backspace] key . 



Example 

Get into the Edit mode 

>EDIT 100 

100- 
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Type in X without hitting INEW LINEI key. The line displayed should be 

100 IF fl = B THEN 150 : fl = fl + 1 : PRINT fl : GOTO 166 



100- 



At this point, the use r m ay ad d some new material, or delete part of the existing line, 
before hitting ISHIFI] and [ESD 



2.9 [T]Key 



"L" represents List line. While the computer is in the Editing level, and is not 
currently executing one of the subcommands H, I, X ,the L command will list the 
remaining part of the line onto the display. 

Example 



>EDIT 100 

100- 

HitOd(without hitting INEWLINB) . the display should be: 

100 IF fl = B THEN 158 : fl = fl + 1 : PRINT fl : GOTO 100 

100- 

The second line allows the user to do editing, while referencing the first line. 



2.10 A Key 



"A" represents Cancel and Restart. In the Editing level this command moves the 
cursor back to the beginning of the line, cancels all editing changes previously made 
on that line, and restores the former content of the line. 



2.11 [IQKey 



This command shifts the computer from Editing level back to the Active Command 
level, and saves all the changes previously made. Make sure the computer is not 
executing any subcommand before entering E. 
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2.12 [Q]Key 



This command shifts the computer from Editing level back to the Active Command 
level, but cancel all the changes made in the current edit mode. Just type in Q to 
cancel the changes made and return to the Active Command level. 



2.13 n[D] Key 



"D" represents delete; the command will delete n numbers of characters right after 
the current cursor position. The deleted characters will be enclosed in exclamation 
marks "!" to show you which characters are being affected. 

Example 

Consider the following line: 

10© IF rl - B THEN 156 : A = A + 1 . PRINT A : GOTO 160 
We first enter into the Editing level, move the cursor to the following position: 

100 IF A = B THEN 158 : A = A + 1 
Now type in 15D(to delete 15 characters); the display should look like: 

180 IF A = B THEN 159 : A = A + 1! : PRINT A : GO! 

Then use L to list the entire line, the display should become: 

100 IF A = B THEN 150 : A = A + 1! : PRINT A : G0!T0 198 

100- 

List Again: 

190 IF A = B THEN 150 : A = A + 1T0 100 

100- 

Now use the X key and the Backspace key to delete "TO 100"; the final outcome 
should be: 

100 IF A = B THEN 150 : A = A + 1 



2.14 n [C] Key 



"C" represents change; the command allows the user to change n number of characters 
right after the current cursor position. If the number n is not specified, the computer 
assumes the user only wants to change a single character. 
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Example 
Consider the line 

190 IF fl = B THEN 150 : fl = fl + 1 

If the user wants to change 150 to 230, he should enter the Edit mode and move 
the cursor to the following position: 

108 IF fl = B THEN 

No w type in 2 C (ch ange the next 2 characters), followed by 23 (new data), then hit 
the lSHIFTl and [E§Cl kevs. List the line by hitting!]: 

100 IF fl = B THEN 230 : fl = fl + 1 

100 _ 



2.15 n(Sjc 



The command searches for the n th occurrance of the character c on that line and 
moves the cursor to that position. If the n value is not provided, the computer will 
search for the first occurrance of the character specified and stop the cursor there. In 
case the specified character is not found, the cursor will move to the end of the line. As 
usual, the computer will start searching from the current cursor position toward the 
right end of the line. 
Consider the following example: 

100 IF fl = B THEN 230 : fl = fl + 1 

After entering the Edit mode, the display should look like: 

100 _ 

Now type in 2S = , to inform the computer to search for the second occurrance of the 
equal sign "=", and the final display should be 

100 IF fl = B THEN 230 : fl _ 

Now, the user may enter one of the subcommands at the current cursor position. For 

example: 

Type in H (hack and insert) followed by "= A + 2" (new data). 

Then the line will become: 

100 IF fl = B THEN 230 : fl = fl + 2- 
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2.16 n K c 



The command will delete all characters up to the n th occur ranee of character C, and 
move the cursor to that position. Consider the following example: 

190 IF fl = B THEN 229 : fl = A + 2 
Enter into the Edit mode: 
199. 

Now type in 1K: S to inform the computer to search for the first occurrance of the 
colon ":" symbol, then delete everything in front of it on that line. 
The display should become 

199 ! IF fi = B THEN 239 ! 
The ":" should also be deleted so type in D, the display will become: 

100 !IF fl = B THEN 220 !!:! 
Then hit the L key to list the line on the display. The line should look like 

199 fi = fl + 2 

100- 
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CHAPTER 3 






BASIC PROGRAMMING STATEMENTS 

In this chapter, we are going to discuss the program statements in our BASIC language. The 
first part of this chapter covers all the Input-Output statements available for the computer 
to communicate with the outside world ; essentially through the keyboard and video display, 
as well as storing to and retrieving from cassette tapes. 

The second part of this chapter concerns various functions of all the programming 
statements in BASIC which are acceptable to the Video Genie System. Since it is a 
very large set of statements, and each statement has its own unique and characteristics in 
programming, the users are advised to study each statement with the help of the 
examples provided. 



INPUT - OUTPUT STATEMENTS 



3.1 PRINT item list 

Prints an item or a list of items on the display. Item may be any of the following: 

a) Numeric constants (numbers such as 0, 36872, 0.2, - 34) 

b) Numeric variables (names respresenting numeric values, such as X, Y, Z, etc.) 

c) String constants (characters enclosed in quotes, such as "HOME COMPUTER", 
"3003", etc.) 

d) String variables (names representing string or character values, such as A$ , B$, etc.) 

e) Expressions (a sequence of any combination of the above, such as (X + 10)/Y S 
"BALL" + "PEN", etc.) 

Items in the item list may be separated by commas or semi-colons. If commas are used, 
the cursor automatically advances to the next printing zone before printing the next 
item. If semi-colons are used, no space is inserted between alphabetic items before 
printing on the display, but one space is inserted before each numeric item. 



Example 



10 N = 25 + 7 
26 PRINT "25 + 
30 END 



7 IS EQUAL TO "i N 
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READY 
>RUN 

25 + 7 IS EQUAL TO 32 



Example 

19 H$ = "HOME " 

26 C* = "COMPUTER" 

30 PRINT "TRY OUR ";H$;C$ 

40 END 

READY 
>RUN 

TRY OUR HOME COMPUTER 



When commas are used to separate items, 4 columns are acceptable per line. Each 
column consists of a maximum of 16 characters. Any string beyond this bound will 
be printed on the next line. 



Example 



10 PRINT "COLUMN 1", "COLUMN 2", "COLUMN 2", "COLUMN 4", "COLUMN 5" 
20 END 

READY 
>RUN 

COLUMN 1 COLUMN 2 COLUMN 2 COLUMN 4 

COLUMN 5 



If two or more commas are applied together, each comma will still occupy 16 
characters. (Blank spaces). 



Example 



10 PRINT "COLUMN 1",, "COLUMN 2" 
20 END 

READY 
>RUN 

COLUMN 1 COLUMN 2 
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Note the following examples: 

10 PRINT "LINE ONE" 
20 PRINT "LINE TWO" 
36 END 



REfiDV 
>RUN 




LINE ONE 
LINE TWO 




10 PRINT 
20 PRINT 
30 END 


"LINE ONE", 
"LINE TWO" 


REfiDV 
>RUN 




LINE ONE 


LINE TWO 



3.2 PRINT® location, item list 

This statement prints out items in the item list at the screen location specified. The 
"@" sign must follow PRINT immediately, and the location specified must be a 
number of value from to 1023. For more details on the display map, please refer 
to Appendix E. 

Example 

26 PRINT 6100, "LOC 160" 

If the user constructs a PRINT® statement to print on the bottom line of the diplay, 
there will be an automatic line-feed, causing everything displayed to move up one 
line. To suppress this action, add a semi-colon at the end of the statement. 

Example 

10 PRINT C- 939 > "BOTTOM LINE"; 
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3 .3 PRINT TAB(expression) 

Allows the user to print at any specified cursor position within a line. More than 
one TAB in a PRINT statement is acceptable. However, the value in the expression 
should be between and 63 inclusive. 

Example 

16 PRINT TRB<10> "POSITION 10" TflB<30> "POSITION 20" 
20 END 

REfiDV 
>RUN 

POSITION 10 POSITION 30 

10 N = 4 

20 PRINT TAB<N> "POS. ";N TflB<N+10) "POS. ";N+10 TfiB(N+20) "POS. "; N+20 

30 END 

RERDV 

>RUN 

POS. 4 POS. 14 POS. 24 

3.4 PRINT USING format; item list 

This statement allows the user to print the data with a pre-defined format. The data 
can be numeric or string values. 

The format and item list in PRINT USING statement can be expressed as variables or 
constants. The statement prints the item list according to the format specified. 
The following specifiers may be used in the format field. 

# This sign represents the proper position of each digit in the item list (for numeric 

value). The number of # signs used forms the format desired. If the format field is 
greater than the numeric value (in the item list), the unused field positions to the left 
of the number will be displayed as spaces and those to the right of the decimal point 
will be displayed as zeros. 

The decimal point can be placed anywhere in the format field established by the # 
signs. Rounding off will take place if the digits to the right of the decimal point are 
suppressed. 

The comma - When it is placed at any position between the first digit and the 
decimal point, a comma will be displayed to the right of every three digits. 
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Let us consider the following examples: 

16 INPUT "ENTER FORMAT "; F* 

20 IF F* = "STOP" END 

30 INPUT "ENTER A NUMBER ";N 

40 PRINT USING F*;N 

50 GOTO 10 
This program requests inputs for the format field and item list (in this case with 
numeric value). The program will stop only if the user inputs the word "STOP" as the 
value for F$. 

Now try to run this program. 

READV 
>RUN 

ENTER FORMAT ?##. #* 

ENTER A NUMBER ? 12. 34 

12.34 

ENTER FORMAT ?###. M 

ENTER A NUMBER ? 12. 34 

12.34 
ENTER FORMAT ?##. ## 
ENTER A NUMBER ? 123. 45 
K123. 45 
ENTER FORMAT ?ST0P 

The % sign will be automatically printed out if the field is not large enough to contain 
the number of digits found in the numeric value. The entire number to the left of the 
decimal point will be displayed after the % sign. 

Let us run tne program again. 

READV 
>RUN 

ENTER FORMAT ?##. ## 

ENTER A NUMBER ? 12. 345 

12.35 

ENTER FORMAT ?STOP 

Since only two decimal places were specified, the numeric value will be rounded-off 
before displaying to the screen. 
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(i) ** Two asterisks placed at the beginning of the format field will cause all 
unused positions to the left of the decimal point to be filled with asterisks. 
The two asterisks will establish two more positions in the field. 

(ii) $$ Two dollar signs placed at the beginning of the field will act as a floating 
dollar sign. That is: A dollar sign will occupy the first position preceding the 
number. 

(iii) **$ Combines the effects of ** and $$. Any empty position to the left of the 
number will be filled by the * sign and the $ sign will also occupy the first 
position preceding the number. 
Let us use the same example as before: 

REflDV 
>RUN 

ENTER FORMAT ?**##. ## 
ENTER fl NUMBER ? 12. 2 
**12. 20 

ENTER FORMAT ?*$##. ## 
ENTER A NUMBER ? 12. 34 

$12. 24 
ENTER FORMAT ?**$###. ## 
ENTER A NUMBER ? 12. 24 
***$12. 24 
ENTER FORMAT ?STOP 



(iv) + When a "+" sign is placed at the beginning or at the end of the format field, 
the computer will print a + sign for a positive number or a - sign for a 
negative number at the specific position accordingly. 

(v) - When a "-" sign is placed at the end of the format field, it will cause a 
negative sign to be printed after any negative number, and will display as a 
blank for positive numbers. 

Examples (using the same program as above) 

READV 
>RUN 

ENTER FORMAT ?####># 
ENTER A NUMBER ? 12345. 6 
12, 246 
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ENTER FORMAT ?+##. ## 

ENTER A NUMBER ? 12. 34 

+12. 34 

ENTER FORMAT ?+tttt. #tt 

ENTER A NUMBER ?-12. 34 

-12. 34 

ENTER FORMAT ?##. ##+ 

ENTER A NUMBER ?-12. 34 

12. 34- 

ENTER FORMAT ?##. ##- 

ENTER A NUMBER ? 12. 34 

12. 34 

ENTER FORMAT ?##. ### 

ENTER A NUMBER ? 123456 

K123456. 006 

ENTER FORMAT ?STOP 

(vi) % space % 

To define a string field of more than one character. The length of the format field 
will be 2 plus the number of spaces between the percentage signs. An exclamation 
mark (!) informs the computer to use only the first character of the current string value. 

Consider the following program example: 

10 INPUT "ENTER FORMAT "i F* 

20 IF F$ = "STOP" END 

30 INPUT "ENTER A STRING ";.C$ 

40 PRINT USING F$; C$ 

50 GOTO 10 

This program performs similarity to the one we just used. The only difference is that, 
the user has to input a string value instead of a numeric value for the second data 
entry. This is, the variable C$. 
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Now let us run the program and test its function. 

RERDV 
>RUN 

ENTER FORMAT ?! 

ENTER A STRING 7ABCDE 

A 

ENTER FORMAT ?Ji '/. 

ENTER A STRING 7ABCDE 

ABC 

ENTER FORMAT ?Ji '/. 

ENTER A STRING 7ABCDEF 

ABODE 

ENTER FORMAT 7ST0P 

(vii) ! By using the ! sign, we can also concatenate, or join strings together. 
Example 

10 INPUT "ENTER THREE STRINGS "; A*, B$, C* 

20 PRINT "THE RESULT IS : "; : PRINT USING " ! "j A*; B*; C* 

30 END 



Now, run the program. 

READV 
>RUN 

ENTER THREE STRINGS 7ABC, XVZ, UK 
THE RESULT IS :AXI 

ENTER THREE STRINGS ?A, COMPUTER, PROGRAM 
THE RESULT IS :ACP 



By using more than one "!" signs, the first letter of each string will be printed with 
spaces inserted corresponding to the spaces inserted between the "!" signs. 
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Try to follow this example: 

16 INPUT "ENTER THREE STRINGS ";fl*,B*,C* 

20 PRINT "THE RESULT IS : "; : PRINT USING " ! ! ! "; A*; B$; C* 

36 END 

READY 
>RUN 

ENTER THREE STRINGS ?XYZ, FGH, ABC 
THE RESULT IS :X F fl 



ENTER THREE STRINGS ?A, COMPUTER, PROGRAM 
THE RESULT IS :A C P 



3.5 INPUT item list 

This statement causes the computer to suspend execution of a program and wait until 
the user has input the specified number and type of values through the keyboard. 
Input values can be string or numeric according to the variable type. The items (if 
more than one) in the list must be separated by commas. 

Example 

10 INPUT R*,B*,fl>B 



This statement permits the user to input two string values, followed by two numeric 
values. The input sequence must be consistent. When the computer executes this 
statement, it sends a signal onto the display: 



And waits for the inputs. The user may enter all four values at once (separated by 
commas). In this case, t he inputs co uld be as follow: 
orange, apple, 59, 47 1NEW LINEI 
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The computer then assigns the values accordingly 



fl$ = "ORANGE" 
B* = "RPPLE" 
ft = 59 
B = 47 



The other way to input those values would be by entering the items on separate 
lines. In this way, the computer will remind the user to input the next data for the 
remaining variables by displaying: 
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Until all variables are set, the computer then advances to the next statement. Input 
must be compatible to the variable type specified. In other words, the user should not 
input a string value to a numeric variable. If such an invalid entry occurs, the com- 
puter will send the message: 



? REDO 



Indicating the input does not match with the current variable type. However, the 
computer gives the user a second chance to input the correct data starting with the 
first value expected by the INPUT statement. 

Example 



10 INPUT 
20 PRINT 
30 END 


R$,fl 


REflDV 
>RUN 




? STRING, 
STRING 


10 



10 
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.READY 

>RUN 

? THIS IS ft STRING, 12. 5 

THIS IS ft STRING 13. 5 

REFIDV 
>RUN 

? ABCD, UK 
? REDO 
? ftBCDE 
?? 25 
ftBCDE 25 



If an input string consists of blanks, the entire string must be enclosed by quotes. 

In order to provide a clearer indication to the operator, the user may include a 
"prompting message" in the INPUT statement. This helps to input correct data type 
to each variable. The prompting message must immediately follow INPUT, enclosed 
in quotes, and followed by a semi-colon. 



Example 

160 INPUT "INPUT ITEM NAME AND QUANTITY "; Nfc Q 



READV 
>RUN 

INPUT ITEM NAME AND QUANTITY ? 
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3.6 DATA item list 

This statement allows the user to store data inside the program and to access them 
through READ statements. The item list will be accessed by the computer sequent- 
ially, starting with the first item in the first DATA statement, and ending with the last 
item in the last DATA statement. Each item in the item list may be a string or a 
simple numeric value. Just like entering data from the keyboard, any string value 
consists of blanks, colons, commas, must be enclosed in a pair of quotes. 
The order of values in a DATA statement must match up with the variable types in 
the READ statements. DATA statements may appear anywhere in a program. 



Example 



10 READ A$, B$, C, D 

20 PRINT A*, B#, C, D 

38 DATA "CHARACTERS", "A LONG SENTENCE" 

40 DATA 20, 137. 54 

50 END 



READV 

>RUN 

CHARACTERS A LONG SENTENCE 20 137. 54 



3.7 READ item list 

This statement instructs the computer to read in a value from a DATA statement and 
assign that value to the specified variable. The values in the DATA statement will be 
read sequentially by the READ statement. After all the items in the first DATA 
statement have been read, the next READ statement encountered will access the 
second DATA statement for the next variable. If there is no more value in the DATA 
statement available for a READ statement an Out-of-Data error will occur. 
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Consider the following example: 

10 READ C* 

29 IF C$ = "EOF" GOTO 60 

39 READ Q 

40 PRINT C$,Q 
50 GOTO 10 

60 PRINT: PRINT "END OF LIST. ":END 
70 DRTfl BOOKS, 4, PENCILS, 12 
80 DATA BALL PENS, 5, COMPASSES, 2 
90 DATA GLASSES, 5, EOF 



3.8 



READY 
>RUN 




BOOKS 
PENCILS 
BALL PENS 
COMPASSES 
GLASSES 


4 

12 

5 

2 
5 


END OF LIST. 




RESTORE 





This statement allows the next READ statement to access the first item in the first 
DATA statement, and the subsequent items. 



Example 



IS READ A*, A 

20 PRINT At, A 

38 RESTORE 

40 READ B$,B 

50 PRINT A*,A,B*,B 

60 DATA "JOHN WHITE", 25, "JOE HUDSON", 32, "BILL ADAMS", 30 

70 END 
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REflDV 
>RUN 

JOHN WHITE 
JOHN WHITE 



Z5 



JOHN WHITE 



Z3 



This program shows that the RESTORE statement not only allows the READ state- 
ment to access the first item in the first DATA statement, but also it has no effect on 
the previous assignments. 



3.9 PRINT # - cassette number, item list 

This statement prints the values of the specified variables onto cassette tape. The 
recorder must be properly set in record mode before executing this statement. For 
more detail, please consult the User's Manual. As the Video Genie System can 
control up to two cassette drives, the user should specify which drive is intended. 



Example 



10 fl$ = "BEGIN TAPE" 

26 B = 3. 1416 

30 C = 50 

40 D* = "DfiTFT 

50 PRINT #-1, fl$, B, C, b$, "END OF FILE" 

60 END 



This program assigns various data to variables AS, B, C, and D$ respectively, then 
PRINT these data on tape through cassette drive No. 1. Note that the string constant 
"END OF FILE", can be printed on tape as well as variables. Once the data are stored 
on tape, the user may input these data into the computer again, just like playing 
music tapes with a cassette. Please note that the INPUT statement must be identical 
to the PRINT statement in terms of number and types of variables. However, the 
variable names may be different in any case. 



Important: 

The total number of characters respresented in all the variables mentioned in the "item 
list" must not exceed 255; otherwise anything after the 255th character with be 
truncated or lost. 
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Example 

10 PRINT #-jL fl$, B$, C*, D$, E* 



If the total number of characters in A$, B$, C$, D$, are 250 and E$ has a length of 
35 characters, then E$ will not be saved on tape. And if the user tries to INPUT the 
value of E, an Out-of-Data error will occur. 



3.10 INPUT # - cassette number, item list 

This statement tells the computer to input the specified number of values stored on 
the cassette tape and to assign them to the variables. The user must specify the cassette 
drive number from which data is expected. 

Example 

19 INPUT #-1, fl$, B, C, D$ 



This statement inputs data from cassette drive number 1. The first value is assigned to 
A$, the second value to B, etc. The cassette deck must be in PLAY mode. Once the 
computer executes this statement, the cassette drive will be turned on, and when the 
input has finished, the cassette drive will be turned off before the computer goes to 
the next statement. 

If a string is encounted when a numeric value is expected by the INPUT statement, a 
bad file data erroi will occur. An Out-of-Data error will also occur if there is not 
enough data items on the tape for all the variables in an INPUT statement. 
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PROGRAM STATEMENTS 



3.11 DEFINT letter range 

Variable names that begin with letters specified within the letter range, will be treated 
and stored as integers. However, a type declaration character (refer to the Introduc- 
tion) can over-ride this type definition. Defining a variable name as an integer not 
only saves memory space, but also saves computer time, because integer calculation is 
faster than single or double precision calculation. Note that integers can only take on 
values between - 32768 + 32767 inclusive. 

Example 

10 DEFINT X,Y,Z 



After the computer has executed line 10, all variables beginning with the letters X, Y, 
or Z will be treated as integers. Therefore, X2, X3, YA, YB, ZI, ZJ will become 
integer variables. Except that XI # , X2 # , YB ff, will be still double precision 
variables, because type declaration characters always over-ride DEF statements. 

Example 

19 DEFINT fl - D 



Causes variables beginning with letter A, B, C, or D to be integer variables. 
Note that DEFINT can be placed anywhere in a program, but it may change the 
meaning of variable references without type declaration characters. Therefore, it is 
normally placed at the beginning of a program. 
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3.12 DEFSNG letter range 

Variable names that begin with those letters specified within the letter range, will be 
treated and stored as single precision variables. However, a type declaration character 
can over-ride this type definition. 

Single precision variables and constants are stored with 7 digits of precision and 
printed out with 6 digits of precision. All numeric variables are assumed to be 
single precision unless otherwise specified. The DEFSNG statement is primarily used 
to re-define variables which have previously been defined as double precision or 
integer. 

Example 

10 DEFSNG fi-D.V 



Causes variables beginning with the letter A through D, or Y to become single preci- 
sion. However, A # would still be a double precision variable and Y% still be an mteger 
variable. 



3.13 DEFDBL letter range 

Variable names that begin with those letters specified within the letter range, will be 
treated and stored as double precision. However, a type declaration character can 
over-ride this type definition. Double precision allows 17 digits of precision, while 
only 16 digits are displayed when a double precision variable is printed. 

Example 

10 DEFDBL M-P, G 

Causes variables beginning with one of the letters M through P, or G to become 
double precision. 
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3.14 DEFSTR letter range 

Variables that begin with those letters specified within the letter range, will be treated 
and stored as string. 

However, a type declaration character can over-ride this type definition. Each string 
can store up to 255 characters, if there is enough string storage space cleared. 

Example 

10 DEFSTR fl-D 

Causes variables beginning with any letter A through D to be string variables, unless a 
type declaration character is added. Therefore, after the execution of line 10, the 
assignment B3 = "A STRING" is valid. 



3.15 CLEAR n 

This statement sets all variables to zero. If number n is specified, the computer sets n 
bytes of space for string storage. Everytime when the Video Genie is turned on, 50 
bytes of space are automatically cleared and reserved for strings. 
The CLEAR statement becomes critical during program execution, because an Out of 
String Space error will occur, if the amount of string storage cleared is less than the 
greatest number of characters stored in string variables. 

Example 

16 CLEAR 1000 

Clear 1000 bytes of memory space for string storage. 



3.16 DIM name (dim l,dim 2 dim n) 

The statement defines the variable name to be an array or list of arrays. The number 
of elements in each dimension may be specified through dim 1, dim 2, etc. If dim n 
is not specified, 1 1 elements in each dimension is assumed in each array. The number 
of dimensions is limited only by the memory size available. 
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Example 



lu DIM FK5), B<3, 4>, C<2, 3,3) 

This statement defines the one dimensional array with 6 elements (from to 5); the 
two dimensional array B with 20 elements (4x5); the three dimensional array C with 
48 elements (3x4x4). 

DIM statements may be placed anywhere in a program, and the number of subscripts 
may be an integer or an expression. 



Example 



10 INPUT "NUMBER OF TIMES ", N 
20 DIM fKN+2,4) 



The number of elements in array A may vary according to N. 

To re-dimension an array, the user must use a CLEAR statement either with or 

without the argument n. Otherwise an error will occur. 

Example 



10 X<2> = 13. 6 

20 PRINT "THE SECOND ELEMENT IS : "; X<2> 

30 DIM X<15> 

40 PRINT X<2> 

50 END 



READY 
>RUN 

? DD ERROR IN 20 
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3.17 LET variable = expression 

This statement is used to assign a value to a variable. The word LET is not required in 
assignment statements by the Video Genie BASIC interpreter. However, the user may 
use the word LET in order to make the program compatible with other systems. 



Example 



18 LET A = 5. 67 
26 BY. = 20 
30 S$ = "CHARACTERS" 
40 LET D5i = W. + 1 
50 PRINT A,B/i,S*,D*: 
60 END 



READV 
>RUN 



5. 67 20 CHARACTERS 



In all the assignments above, the variable on the left of the equal sign is assigned with 
the value of the constant or expression on the right side. All these statements are 
acceptable. 



3.18 END 



This statement causes a normal termination of program execution. The END state- 
ment is primarily used to cause execution to terminate at some point other than the 
logical end of the program. 



Example 



5 B = 2: C = 14 

10 A = C + B 

20 GOSUB 70 

30 D = X + V 

40 PRINT "THE RESULTS ARE :"; 

50 PRINT A,D 

60 END 
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70 X = 50 
80 V = A * X 
90 RETURN 

THE RESULTS ORE : 1? 900 



The END statement in line 60 prevents the computer from executing into line 70. 
Therefore the subroutine that starts at line 70 can be accessed only by line 20. 



3.19 STOP 



This statement is essentially a debugging aid. It sets a break point in a program during 
execution, and allows the user to examine or modify variable values. A message will 
be printed out as "BREAK IN line number" once the computer executes the STOP 
statement. The Active Command CONT can then be used to re-start execution at the 
point where it breaks. 

Example 

5 INPUT B,C 
10 fl = B + C 
20 STOP 

30 X = <A + D>/0. 74 
40 IF X < GOTO 70 
50 PRINT A,B,C 
60 PRINT X 
70 END 

READV 

>RUN 

?2,4 

BREAK IN 26 

REflDV 

>PRINT fl 

6 
REflDV 
>C0NT 

6 2 4 
8. 10811 

The STOP statement allows the user to examine the value of A before line 30 
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3.20 GOTO line number 

This statement transfers program control to the specified line number. If used in- 
dependently, an unconditional branch will result. However, test statements may 
precede the GOTO statement to create a conditional branch. 

Example 

16 A = 16 
20 B = 45 
30 C = ft + B 
40 C = C * 3. 4 

50 GOTO 100 
60 . 

70 . 

80 . 

30 . 

100 PRINT "fl =";fl, "B=";B, "C="j C 

110 END 

REflDV 

>RUN 

ft = 10 B= 45 C= 187 

When line 50 is executed, control will unconditionally jump to line 100. 
Example 

10 IF fl = 2 GOTO 120 



When line 10 is under execution, if A equals to 2 then control will jump to line 120, 
otherwise it will just go to the next statement. 

The user may use GOTO in the Active Command level as an alternative to RUN 
command. GOTO line number causes execution to begin at the specified line number, 
but without the automatic CLEAR. 



49 



3.21 GOSUB line number 

Transfers program control to the specified line number where a subroutine starts. 
Only if the computer encounters a RETURN statement, it will then jump back to the 
statement that immediately follows the GOSUB. Just like GOTO, GOSUB may be 
preceded by a test statement, such as: 
IF A = B THEN GOSUB 100 

Example 



19 PRINT "MAIN PROGRAM. " 

26 GOSUB 50 

30 PRINT "END OF PROGRAM. 

40 END 

50 PRINT "SUBROUTINE. " 

60 RETURN 

READY 
>RUN 

MAIN PROGRAM. 
SUBROUTINE. 
END OF PROGRAM. 



3.22 RETURN 



This statement ends a subroutine and returns control to the statement that immedi- 
ately follows the GOSUB. An error will occur if RETURN is encountered without 
execution of a matching GOSUB. 



3 .23 ON n GOTO line number list 

This statement allows multi branching to the line numbers specified according to the 
value of n. The general format for ON n GOTO is: 

ON expression GOTO 1st line number, 2nd line number, . . . , mth line number. 
The value of the expression must be between and 255 inclusive. 
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When ON-GOTO statement is executed, first, the expression is evaluated and the 
integer portion, that is INT (expression) is obtained. Then the computer assigns this 
integer to N, and counts over to the Mth element in the line number list, and then 
branches to the line number specified by that element. If N is greater than the avail- 
able line number M, the control fall through to the next statement in the program. 
If the expression or number is less than zero, an error will occur. 
The line number list may contain any number of items. 

Example 

10 INPUT "ENTER COMMAND "; C 

20 ON C GOTO 160,120,130,150,130 

30 PRINT "END OF PROGRAM. ":END 

100 PRINT "THIS IS LINE 100": GOTO 10 

120 PRINT "THIS IS LINE 120": GOTO 10 

130 PRINT "THIS IS LINE 130": GOTO 10 

150 PRINT "THIS IS LINE 150": GOTO 10 

REflDV 

>RUN 

ENTER COMMAND ? 5 

THIS IS LINE 130 

ENTER COMMAND ? 4 

THIS IS LINE 150 

ENTER COMMAND ? 1 

THIS IS LINE 100 

ENTER COMMAND ? 2 

THIS IS LINE 120 

ENTER COMMAND ? 3 

THIS IS LINE 130 

ENTER COMMAND ? 

END OF PROGRAM. 

RERDV 

>RUN 

ENTER COMMAND ? 4 

THIS IS LINE 150 

ENTER COMMAND ? 6 

END OF PROGRAM. 
The ON-GOTO statement is a more elegant way of achieving the some result 
than the equivalent IF-GOTO statements: 

10 IF C = 1 GOTO 100 
20 IF C = 2 GOTO 120 
30 IF C = 3 GOTO 130 
40 IF C = 4 GOTO 150 
50 IF C = 5 GOTO 130 
60 IF C < 1 OR C > 5 GOTO 70 :REM GO TO THE NEXT STATEMENT. 
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3.24 ON n GOSUB line number list 

Works like ON n GOTO, except control branches to one of the subroutines specified 
by the line numbers in the line number list. 



Example 



10 PRINT " ** FUNCTION SUBROUTINES 

26 PRINT " 1. FUNCTION R" 

30 PRINT " 2. FUNCTION B" 

49 PRINT " 3. FUNCTION C" 

50 INPUT "ENTER 1, 2, OR 3 ";N 
60 ON N GOSUB 150, 100, 250 

70 END 



**" 
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166 PRINT "THIS IS FUNCTION B" : 


: RETURN 


15@ PRINT "THIS IS FUNCTION fl" 


: RETURN 


250 PRINT "THIS IS FUNCTION C" 


: RETURN 


READY 




>RUN 




+* FUNCTION SUBROUTINES ** 




1. FUNCTION fl 




2. FUNCTION B 




2. FUNCTION C 




ENTER 1, 2, OR 3 ? 2 




THIS IS FUNCTION B 




READY 




>RUN 




** FUNCTION SUBROUTINES ** 




1. FUNCTION fl 




2. FUNCTION B 




1 FUNCTION C 




ENTER i, 2, OR 3 ? 1 




THIS IS FUNCTION fl 




FOR name = expression TO expression STEP 


expression 


NEXT name 





These statements form an iterative loop so that a sequence of program statements 

may be executed over a specified number of times. 

The general form is: 

FOR counter = initial value TO final value STEP increment. 



Statements 
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NEXT counter 



In the FOR statement, initial value,final value and increment can be constants, vari- 
ables or expressions. The first time the FOR statement is executed, these three are 
evaluated and the values are saved; if these values are changed inside the loop, they 
will have no effect on the loop's operation. However, the counter value must not be 
changed or the loop will not operate normally. 

The FOR-NEXT loop works as follows: the first time the FOR statement is executed, 
the counter is set to the "initial value". Execution proceeds until a NEXT statement 
is encountered. At this point, the counter is incremented by the amount specified in 
the STEP increment. If STEP increment is not used, an increment of 1 is assumed. 
However, if the increment has a negative value, then the counter is actually 
decremented. 

The counter is then compared with the final value specified in the FOR statement. If 
the counter is greater than the final value, the loop is completed and execution 
continues with the statement following the next statement. (if increment was a negative 
number, loop ends when counter is less than the final value.) 

If the counter has not yet exceeded the final value, control passes back to the first 
statement after the FOR statement. 

Example 



10 


FOR K 


= TO 


1 STEP 


0.3 




20 


PRINT 


"THE VfiLUE 


OF 


K :", 


K 


38 


NEXT K 


F 










40 


END 












REflDV 












>RUN 












THE 


VfiLUE 


OF K 











THE 


VALUE 


OF K 


: .3 








THE 


VALUE 


OF K : 


.6 








THE 


VfiLUE 


OF K : 


.9 









When K = 1.2, it is greater than the final value 1, therefore the loop ends without 
ever printing 1.2. 
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Example 



16 FOR N = 5 TO 

20 PRINT "THE VALUE OF N : "; N 

56 NEXT N 

40 END 

READV 
>RUN 

THE VALUE OF N : 5 

10 FOR N = 5 TO STEP -1 
20 PRINT "THE VALUE OF N :";N 
30 NEXT N 
40 END 



READV 






>RUN 






THE VALUE 


OF N : 


: 5 


THE VALUE 


OF N : 


: 4 


THE VALUE 


OF N 


: 3 


THE VALUE 


OF N : 


: 2 


THE VALUE 


OF N 


: 1 


THE VALUE 


OF N ; 


: 



Since no STEP was specified, so STEP 1 is assumed. N is incremented the first time, 
and its value becomes 6. Because 6 is greater than the final value 0, the loop ends. 
This is remedied by adding STEP-1 , as you can see. 
Example 



";fl 



10 FOR A'= 


= 


TO 


3 






20 PRINT ' 


"THE VALUE 


OF 


A 


30 NEXT 












40 END 












READV 












>RUN 












THE VALUE 


OF 


A : 









THE VALUE 


OF 


A : 


1 






THE VALUE 


OF 


A : 


: 2 






THE VALUE 


OF 


A : 


: 3 







Note here that instead of using NEXT A in line 30, you may simply write NEXT. 
However, this can lead to trouble if you have nested FOR-NEXT, loops. 
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Here is an example of nested loops, showing how it is advisable to identify the 
counter variable in each NEXT statement: 

16 I = 1 

26 J = 2 

20 K = 3 

40 FOR N = I + 1 TO J + 1 

50 PRINT "FIRST LOOP" 

60 FOR M = I TO K 

70 PRINT " SECOND LOOP" 

80 NEXT M 
90 NEXT N 

100 END 
REflDV 
>RUN 

FIRST LOOP 
SECOND LOOP 

SECOND LOOP 
SECOND LOOP 

FIRST LOOP 
SECOND LOOP 

SECOND LOOP 
SECOND LOOP 

3.26 ERROR Code 

This statement is used for testing an ON ERROR GOTO routine. When the ERROR 
code statement is encountered, the computer will proceed exactly as if that kind of 
error has occurred. 

Example 

30 ERROR 1 

?NF ERROR IN 30 
For the definition of each error code, please refer to Appendix B. 



55 



3.27 ON ERROR GOTO line number 

This statement allows the user to set up an error-trapping routine to recover a pro- 
gram from an error and to continue, without any break in execution. Without this 
statement, the computer will stop execution and print out an error message, once it 
encounters any kind of error in the user's program. Normally, the user has a particular 
type of error in mind when an ON ERROR GOTO statement is used. 
For example, suppose that a program performs some division operations and the user 
has not ruled out the possibility of division by zero. The user could write a routine to 
handle a division-by-zero error, and then use ON ERROR GOTO to branch to that 
routine when such an error occurs. 



Example 



5 B = 15 : C = 6 

16 ON ERROR GOTO 129 

20 fl = B/C 

30 PRINT fl,B,C 

40 END 

120 PRINT "DIVIDED BV ZERO 

130 END 

REflDV 

I/RUN 

DIVIDED BV ZERO i ! 



In this example, C has a value of zero, so a divide-by-zero error will occur when the 
computer attempts to execute line 20. But because of line 10, the computer will 
simply ignore line 20 and branch to the error-handling routine beginning at line 120. 
Please note that the ON ERROR GOTO statement must be executed before the 
error occurs, otherwise it has no effect. Note also that the error handling routine 
must be terminated by a RESUME statement. 
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3.28 RESUME line number 

This statement terminates an error handling routine by specifying where normal 

execution is to resume. 

RESUME or RESUME without a line number causes the computer to return to the 

statement in which the error occurred. If RESUME is followed by a line number, it 

causes the computer to branch to the line number provided. 

RESUME NEXT causes the computer to branch to the statement following the point 

at which the error occurred. 

Example 

10 ON ERROR GOTO 86 

29 PRINT "SIMPLE DIVISION. " 

3Q INPUT "ENTER TWO NUMBERS ";fl,B 

46 IF fl = END 

50 C = fl/B 

66 PRINT "THE QUOTIENT IS ";C 

79 GOTO 20 

80 PRINT "ATTEMPT TO DIVIDE BY ZERO ! " 
90 PRINT "TRY AGAIN. . . " 

100 RESUME 20 

READY 
>RUN 

SIMPLE DIVISION. 

ENTER TWO NUMBERS ? 6 , 2 

THE QUOTIENT IS 2 

SIMPLE DIVISION. 
ENTER TWO NUMBERS ? 7 , 2 
THE QUOTIENT IS 2. 22222 
SIMPLE DIVISION. 

ENTER TWO NUMBERS ? 5 , 
ATTEMPT TO DIVIDE BY ZERO ! 

TRY AGAIN. . . 

SIMPLE DIVISION. 

ENTER TWO NUMBERS ? 9 , 4 

THE QUOTIENT IS 2. 25 

SIMPLE DIVISION. 

ENTER TWO NUMBERS ? B , 

READY 
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3.29 REM 



REM represents remarks. This statement informs the computer that the rest of the 
line only consists of comments, and should be ignored. The statement also allows 
the user to have more comments in his program for better documentation. If REM is 
used in a multi-statement program line, it must be the last statement. 



Example 



10 REM * VflRIRBLE REPRESENTATIONS * 
28 REM * A = flMOUNT * 

30 REM * B = NUMBER OF ITEMS * 
40 REM * C = UNIT COST * 

50 REM * * 

60 A = B * C : REM ** flMOUNT = NO. OF ITEMS X UNIT COST 
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3.30 IF expression action-clause 

This statement instructs the computer to test a logical or relational expression. If 
the expression is TRUE, control will proceed to the "action" clause immediately 
following the expression. If the expression is False, control will jump to the matching 
ELSE statement (if there is one) or down to the next program line. 
In numerical terms, if the expression, has a non-zero value, it is always equivalent to a 
logical true. 

Example 

10 INPUT "ENTER A VflLUE <MAX. 20) "; fl 

20 IF fl > 20 GOTO 60 

30 fl = fl * 3. 1416 * 2 

40 PRINT "THE CIRCUMFERENCE IS : "; fl 

50 END 

60 PRINT "NUMBER TOO BIG ! <MAX. 20)": GOTO 10 



READY 
>RUN 

ENTER ft VflLUE (MAX. 20) ? 24 
NUMBER TOO BIG ! <MAX. 20) 
ENTER A VALUE <MAX. 20) ? 18 
THE CIRCUMFERENCE IS : 113. 098 



In this example, if A is greater than 20 then a warning is printed and another input is 
expected. However, if A is equal to or less than 20, the computer will go to the next 
line and compute the value of A, without passing through the warning message and 
the GOTO statement. 

Example 

120 INPUT fl: IF fl = 10 RND fl > B THEN 160 

120 INPUT fl: IF fl = 10 AND fl > B GOTO 160 
The two statements above have the same effect. 



3.31 THEN statement or line number 

Initiates the "action clause" of an IF — THEN type statement. THEN is optional 
except when it is used to specify a branch to another line number, as in IF A > D 
THEN 100. THEN should also be used in IF - THEN - ELSE statements. 



3.32 ELSE statement or line number 

This statement must be used after the IF statement, and acts as an alternative action 
in case the IF test fails. 

Example 

10 IF fl = 1 THEN 60 ELSE 40 



In this example, if A = 1 then control branches to line 60, otherwise it branches to 
line 40. If the ELSE clause is not used and A is not equal to 1, the computer will go 
to the next statement instead of branching to line 40. 

IF-THEN-ELSE statements may be nested, but the number of IFs and ELSEs must 
match with each other. 
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Example 

10 INPUT "ENTER THREE NUMBERS "; X, V, Z 

26 PRINT "THE LARGEST NUMBER IS : M ; 

30 IF X <: V OR X C 2 THEN IF V <: Z THEN PRINT 2 ELSE PRINT V ELSE PRINT X 

40 END 

REflDV 

>RUN 

ENTER THREE NUMBERS ? 30 , 75 , 72 

THE LARGEST NUMBER IS : 75 

This program accepts three numbers and prints out the one that has the highest value. 



3.33 LPRINT 



Prints a file onto the printer. This command (and statement) functions similar to a 
PRINT statement (print on the display). If the line printer is not properly 
connected, the computer will enter a dead loop and will wait to print the first 
character. This situation can only be resolved by turning the printer on or hitting the 
RESET button. 

10 FOR X = 1 TO STEP -0. 25 
20 LPRINT "THE VALUE OF X : "; X 



30 NEXT X 




48 END 




REflDV 




>RIJN 




THE VALUE OF X : 


1 


THE VALUE OF X : 


.75 


THE VALUE OF X : 


.5 


THE VALUE OF X : 


.25 


THE VALUE OF X : 
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CHAPTER 4 
PROCESSING ARRAYS 



An array is simply an ordered list of data. Both alphabetic and numeric arrays are acceptable 
by the Video Genie Systems. However, the data type of an array must be consistent. The 
concept of arrays is very important in computer programming, therefore the user should 
try to understand the examples in this Chapter. 

Suppose John Washington is studying in a college. There is a three story building which has 
four classrooms on each floor and each room has 45 seats. 

John is taking a history course. There are only 36 students in his class. Now, let us look 
through the name list of John's class. 



NAME LIST 
1 . Mary Adams 



2. Jimmy Brown 

3. Henry Cox 



36. John Washington 



In order to find a specific person in the list, we just read the list from top to bottom or from 
bottom to top; however, the method of searching by name is not very important here. 

The most important issue is how we can find a person in the list by referring his number 
only. In the list mentioned above, the 1st person is Mary Adams, the 2nd person is Jimmy 
Brown, etc. The numbers give us a systematic way to find a person. 
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If we use a computer to record this list, we may assign each name in the list to a unique 
variable, as the following. 



10 1 


N0$ = 


"MflRV RDflMS" 


20 1 


Hl$ = 


"JIMMY 


BROWN" 


30 1 


M2$ = 


"HENRY 


COX" 


40 . 








50 . 








69 . 








70 . 








80 . 








90 . 








100 


NS$= 


"TOM HUDSON" 


110 


. 






120 


. 






126 








140 


NZ* ■ 


■ "JOHN 


WASHINGTON" 



This is a time consuming and inefficient method; besides, what happens if there are 37 
students in the class? 

Obviously, we need to use a variable name starting with another letter, such as Ml$, etc. 
Another way, also the better way to handle this list is by using an array. We first define an 
array AR$ of 45 elements (for there are 45 seats), then assign those names to each element. 



Example 



5 CLEAR 1060 : REM CLEAR 1000 BYTES FOR STRING STORAGE. 

18 DIM AR$<44) : REM ARRAY AR* HAS 45 ELEMENTS. 

20 FOR N = TO 44 : REM LOOPS 45 TIMES 

20 INPUT "ENTER THE NAME OF THE STUDENT ";AR*(N> 

40 REM ASSIGN THE NAMES TO EACH ELEMENT IN THE ARRAY. 

50 NEXT N 

60 END 
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This program accepts 45 names and stores them in the array AR$. After executing the 
program, the following should be true. 

Element AR$ (0) has the value of "Mary Adams" 
Element AR$ (1) has the value of "Jimmy Brown" 
Element AR$ (2) has the value of "Henry Cox" 



Element AR$ (36) has the value of "John Washington" 

Provided the inputs are correct, of course! 

Now, if we want to print out the entire list, we may use this program. 

5 CLEAR 1000 : REM CLEAR 1600 BVTES FOR STRING STORAGE. 

10 DIM AR$<44> : REM ARRAV AR$ HAS 45 ELEMENTS. 

15 REM ** INPUT ARRAV SECTION ** 

20 FOR N ■ TO 44 : REM LOOPS 45 TIMES 

30 INPUT "ENTER THE NAME OF THE STUDENT "j AR*<N> 

40 REM ASSIGN THE NAMES TO EACH ELEMENT IN THE ARRAV. 

50 NEXT N 

55 REM ** PRINT ARRAV SECTION ** 

60 FOR N = TO 44 : REM LOOPS 45 TIMES. 

70 PRINT AR$<N> : REM PRINTS THE N TH ELEMENT OF THE. ARRAV. 

80 NEXT N 

90 END 

Instead of the following statements. 

10 PRINT N0$ 
20 PRINT Nl$ 
30 PRINT N2* 
40 . 
50 . 
60 . 

70 . 

80 PRINT NS$ 

90 . 

100 . 

110 PRINT NZ* 
120 . 
130 . 
By now, the user should have some feeling of how powerful arrays could be. 
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Suppose the teacher in John's class wants to set up a seat plan by rows and colums. Since 
there are 6 columns, then only 6 rows of seats are needed. 



ROW 







































HENRY 
COX 






JIMMY 
BROWN 












JOHN 
WASHINGTON 








MARY 
ADAMS 











2 3 

COLUMN 



The four students we always mentioned are seated as in the plan above. Since they are 
not seated according to the name list, we need another method to access the seat plan. For 
example, if the professor tries to see if John Washington is absent or not, he has to look 
through the room and find out whether the seat at row 1, column 3 is empty or not. The 
professor has to search for row 2 column for Henry Cox as well. Actually, the computer just 
works the same as the teacher does. We may map this seat plan into a two dimensional array 
named SP$ (5, 5), the first 5 is for row, and the second 5 is for column. In case we want to 
call Jimmy Brown, we must reference SP$ (2, 3), that is row 2 column 3. 
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Now suppose we want to print the seat plan in a table form, we may use the program below: 

10 CLEAR 1009: DIM SP$<5, 5) : REM SP* IS A 6 X 6 ARRAV. 

20 FOR R = 5 TO STEP -1 

30 REM SET fl LOOP TO PRINT FROM ROW 5 TO ROW 0. 

40 FOR C = TO 5 

50 REM SET fl LOOP TO PRINT THE NAMES IN EACH COLUMN. 

60 PRINT SP*<R,C>, : REM PRINT THE NAME AT ROW 'R' COLUMN 'C. 

70 NEXT C 

80 PRINT : REM CARRIAGE RETURN 

90 NEXT R 

100 END 

This program prints a seat plan in a table form. It starts with the last row in the class, and 
ends with the first row. The program first initializes. R = 5, C = then prints the value of 
the elements. 



SP*<5, 0)i SP$<5, l)j SP$<5, 2>; SP$<5, 3>; SP#<5, 4); SP$<5, 5) 

At this point, the value of C becomes 5, the computer jumps out of the loop "C" and prints 
a blank line as on line 80 and slips to the next line. The computer passes line 70 and loops 
back to line 20 and then R = 4; the computer resets C = on line 40 and prints the value of. 

SP*<4, 0); SP*<4> 1); SP*<4, 2); SP$<4, 3); SP*<4, 4); SP$<4, 5) 



The process repeated until R = -1 , and the program stops. The final output will have values 
of the elements in the following order. 



SP$<5, 0); SP$<5, 1); SP$<5, 2); SP*<5, 3); SP$<5, 4); SP*<5, 5) 
SP$<4, 0); SP1C4, 1); SP$<4, 2); SP*<4, 3); SP*<4, 4); SP$<4, 5) 
SP*<3, 0); SP$<3, 1); SP*<3, 2); SP$<3, 3>; SP*<3, 4); SP$<3, 5) 
SP*<2, 0); SP*<2, 1); SP$<2, 2); SP$<2, 3); SP*<2, 4>; SP$<2, 5) 
SP$<1, 0>; SP*<1, 1); SP*<1, 2); SP*<1, 3); SP$<1, 4); SP*<1, 5) 
SP*<0, 0); SP*<0, 1>; SP*<0, 2); SP$<0, 3); SP$<0, 4>j SP*<0, 5) 
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By using this two dimensional array, we can locate the exact position of any student in a 
class. But how can we locate another student who sits at the identical position as John 
Washnighton, but in the next class? Of course, we need to mention which class or which 
room number that the student is in. In this case, we need another dimension to describe a 
specific student's location. Remember, there are a totai of twelve class rooms in the 
building. We have different ways to solve this problem. The first method is to assign a 
number ranged from 1 to 12 to each room. Or we may distinguish them by floor number. 

That is room 1 on the 1st floor, room 2 on the 1st floor, , room 1 on the 3rd floor, 

etc. The first method requires only one additional dimension, whereas the second 

method requires two additional dimensions. 

Say John's classroom is the 3rd room on the second floor. By using the first method, we 
may locate John by referring SPS (N, R, C) where N represents the number of the room. R 
represents row number and C represents column number. To be more specific, John sits at 
SPS (7, 1, 3) that is room number 7, row number 1, column number 3. However, by using 
the second method, we need to mention SPS (F, N, R, C) where F represents floor number, 
N represents the room number, R represents row number, C represents column number. To 
locate John, we need to refer to SPS (2, 3, 1, 3), that is the 2nd floor, room number 3, row 
number 1 , column number 3. 

The number of dimensions may increase if we try to accept and classify more students into 
this set. If we try to identify some other students in another building, we need another 
dimension to define which building. If we consider other colleges, yet we need another 
dimension to describe which college. 

In every Video Genie System, the number of dimensions in an array is only limited by the 
memory space available in the computer. 
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CHAPTER 5 
STRING HANDLING 



■ !: K>SS$SSvi"$iH$£ : SS : ; : : : : 



String operations are the essence in data processing. 

It is obvious that if a computer cannot handle string operations, it is only a super powerful 
calculator. Based on this fact, the Video Genie System allows many useful string operations 
in addition to arithmetic operations. 

In this chapter, we will discuss various string functions that are acceptable in our Extended 
Basic language. 



5 . 1 String Comparison 

By using a relational operator, two strings may be compared for equality or alphabetic 
precedence. If they are checked for equality, every character, including any leading or 
trailing blanks, must be identical otherwise the test fails. 



Example 



100 IF fl$ = "YES" THEN 250 



Strings are compared character by character from left to right. Actually, the ASCII 
code representations for the characters are compared. A character with the lower 
code number is considered to precede the other character. In other words, "AB" 
precedes "AC". When strings of different lengths are compared, the shorter string is 
precedent even if its characters are identical as those in the longer string. Therefore, 
"B" precedes "B " The following relational operators may be used to compare 
strings. 



< , <= 



: > > > , = , O 
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5 .2 String Operation 

Basically, there is only one string operation, that is concatenation which is represent 
ed by the plus sign "+". 



Example 



10 Sl$ = "THE SUN IS" 
26 S2$ = " SHINING" 

30 S3$ = ", " 

40 C* = Sl$ + S2$ + S3$ + S2$ 

50 PRINT C$ 

68 END 

READY 

>RUN 

THE SUN IS SHINING, SHINING 



5.3 ASC (string) 

This statement returns the ASCII code (in decimal) for the first character of the 
specified string. The string specified must be enclosed in parentheses. A null-string 
will cause an error to occur. 

100 PRINT "THE- ASCII CODE FOR 'H' IS:"; ASC("H"> 

105 S$ = "HOME" ; PRINT "THE STRING IS:";S$ 

110 PRINT "THE ASCII CODE FOR THE FIRST LETTER IS: "; ASC<S*> 

120 END 

READY 

>RUN 

THE DSC 1 1 CODE FOR 'H x IS: 72 

THE STRING IS: HOME 

THE ASCII CODE FOR THE FIRST LETTER IS:. 72 



Both lines will print the same number. 

A complete set of control, graphics, and ASCII codes is listed in appendix C. 
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5.4 CHR$ (expression) 

This statement works as the inverse of the ASC function, that is to return the 
character of the specified ASCTT, control or graphics code. The argument may be any 
number from to 255, or any variable expression with a value within that range. The 
argument must be enclosed in parentheses. 

100 PRINT CHR*<33> : REM PRINT R '!' SIGN 

5.5 LEFTS (string, n) 

This statement returns the first n characters of the specified string. The arguments 
must be enclosed in parentheses. String may be a constant or an expression, and n 
may be a numeric expression. 



Example 



10 A$ = "ABCDEFG" 
20 B* = LEFT*<R*, 4> 
30 PRINT B$ 
40 END 

READY 
>RUN 

RBCD 



5.6 RIGHTS (string, n) 

Returns the last n characters of a string. Both string and n must be enclosed in paren- 
theses. String may be a string constant or variable, and n may be a numerical constant 
or variable. If the length of the string is less than or equal to n, the entire string is 
returned. 



Example 



10 R$ = "ABCDEFG" 

20 B$ = RIGHT$<fi$,3) 

30 PRINT B* 

40 END 

READY 

>RUN 

EFG 
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5.7 LEN (string) 

Returns the length value of the specified string. The string may be a variable, 
expression or constant and must be enclosed in parentheses. 



Example 



10 fl$ = "flBCDEFG" 

20 PRINT "LENGTH OF THE STRING: "; LEN<A*> 

38 END 

REflDV 

>RUN 

LENGTH OF THE STRING: 7 



5.8 MIDS (string, p, n) 

Returns a substring of string starting at position p, with length n. The string, position 
and length must be enclosed in parentheses. String may be a constant or an expres- 
sion, p and n may be numeric expressions or constants. 



Example 



16 fl$ = "flBCDEFG" 

20 B$ = MD$<fl$, 3i 4> 

30 PRINT "THE NEW STRING IS : "; 6* 

40 END 

REfiDV 
>RUN 

THE NEW STRING IS : CDEF 
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5.9 STR$ (expression) 

Converts a constant or numeric expression into a string of characters. The expression 
or constant must be enclosed in parentheses. 



Example 



18 A = 34. 56 

28 B$ = STR*<R> 

30 B* = B$ + '"/." 

40 PRINT "THE RESULT IS "; B* 

50 END 

REflDV 

>RUN 

THE RESULT IS 34. 56'/. 



5.10 STRINGS (n, character or number) 

Returns a string which composed of n number of the specified character. 

Example 

10 PRINT STRING*<10, "*'"> 
20 END 

REflDV 
>RUN 



Character may be a number from 0-255; in this case, it will be treated as an ASCII, 
control or graphics code. 

10 PRINT STRING$ (10, 33) 
20 END 



REflDV 
>RUN 

i i i 1 1 i i 1 1 
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5.11 VAL (string) 

Performs the inverse of the STR$ function; that is to return the numeric value of the 
characters in a string argument. 

Example 



Id fll- = "56" 

2@ B$ = "22" 

30 C = VflL (.m + ". " + B$> 

46 PRINT "THE RESULTS ARE : "•; C; 

50 END 



REflDV 

>RUN 

THE RESULTS RRE : 56. 23 > 156. 23 
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CHAPTER 6 






BUILT-IN 

ARITHMETIC FUNCTIONS 



In this chapter, we will discuss the built-in functions available in the Video Genie System. In 
most cases, it is necessary to pass an argument (initial value) to the function, before a 
desired value (result) would be returned. The argument may be a constant, a numeric vari- 
able, or an expression. The general format could be: 



result = function (argument) 

Example 

16 H = RND CO 

26 B = INT <C) / D 

36 E = SQR <F * G - 4) 

Functions discussed in this chapter: 



1. 


RBS<X> 


cl. 


fiTN<X> 


~- 


CDBUX) 


4. 


CINTCX) 


5. 


COS<X> 


6. 


CSNGCX) 




EXP<X> 


3. 


FIXOO 


9 


INT(X) 


10. 


LOG<X> 


11. 


RRNDOM 


12. 


RNDOO 


i::. 


sGt-KX> 


14. 


5IN<X) 


15. 


SQR(X> 


16. 


TflNOO 
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6.1 ABS(X) 

Returns the absolute value of the argument X. 

6.2 ATN (X) 

Returns the arctangent function (in radians) of the argument. To get the arctangent 
in degrees, multiply ATN (X) by 57.29578. 

6.3 CDBL (X) 

Returns a double-precision representation of the argument. The value returned 
contains 17 digits, however, only the digits contained in the argument will be 
significant. 

6.4 CINT (X) 

Returns the largest integer that is not greater than the argument. The argument must 

be within the range of — 32768 to + 32768. 

For example, CINT (2.6) returns 2; CINT (-2.6) returns -3. 

6.5 COS (X) 

Returns the cosine function of the argument (in radians). In order to obtain the 
cosine of X when X is in degrees, use COS (X* .0174533) 

6.6 CSNG (X) 

Returns a single-precision representation of the argument. It returns a 6 significant 
digit number with 4/5 rounding for a double precision argument. 

6.7 EXP (X) 

Returns the "natural exponential" of X, that is e x . 
This is the inverse of the LOG function. 

6.8 FIX (X) 

Returns a truncated representation of the argument with all digits on the right of the 
decimal point being truncated or chopped off. For example, FIX (1.5) returns 1, FIX 
(-1.5) returns -1. 
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6.9 INT (X) 

Returns an integer representation of the argument, using the largest integer that is 
not greater than the argument. The argument is not limited to the range -32768 to 
+32768. For example , INT (3.5) returns 3, INT (-3.5) returns -4. 

6.10 LOG(X) 

Returns the natural logarithm of the argument, that is log e (X). To find the logarithm 
of a number of another base b, use the formula log b (X) - log e (X)/log e (b). 

6.11 RANDOM 

This function causes the computer to generate a new set of random numbers,£very 
time when the computer is turned on and runs a program which has RND functions. 
No argument is needed in this function. 

6.12 RND(X) 

Returns a pseudo-random using the current pseudo-random number (generated 

internally and has not access to the user). 

RND (0) returns a single-precision value between and 1, 

RND (X) returns an integer between 1 and X inclusive. 

However, X must be positive and less than 32768. 

6.13 SGN(X) 

The "sign" function, that is to return -1 if X is negative, is X is zero, and + 1 if X is 
positive. 

6.14 SIN(X) 

Returns the sine function of the argument (in radians). 

To obtain the sine of X when X is in degrees use SIN (X* .0174533). 

6.15 SQR(X) 

Returns the square root of the argument. 

6.16 TAN(X) 

Returns the tangent function of the argument (in radians). 

To obtain the tangent of X and X is in degree, use TAN (X* .0174533). 
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CHAPTER 7 
GRAPHICS FEATURES 



There are only four graphics functions available in the Video Genie System. However, they 
are powerful enough to allow the user to create any graphic patterns on the display with or 
without the help of our Extended BASIC language. 

For the display map, please refer to appendix E. 

7.1 SET(x,y) 

This function turns on the graphics block on the display at the location specified by 
the coordinates x and y. The display is divided up into a 128 (horizontal) by 48 
(vertical) grid. The x — coordinates are ranged from to 127, organized from left to 
right. The y — coordinates are ranged from to 47, organized from top to bottom. 
Therefore, point (0, 0) is located at the extreme top left corner of the display; 
whereas point (1 27, 47) is located at the extreme bottom right corner of the display. 
The arguments x and y may be numeric constants, variables or expressions. Since the 
SET (x, y) function uses only the integer portion of x and y, neither argument need 
be an integer. 

7.2 RESET (x, y) 

This function turns off a graphics block on the display at the location specified by the 
coordinates x and y. This function has the same limits and parameters as SET (x, y). 



7.3 CLS 

This function clears the entire display by turning off all the graphics blocks. It also 
moves the cursor to the upper left corner. This function allows the user to present an 
outstanding display on the screen, without any symbol previously displayed. 

7.4 POINT (x,y) 

This function examines the specified graphics block to see whether it is ON or OFF. 
If the block is ON (has been SET), then POINT returns a binary True (-1). If the 
block is OFF, POINT returns a binary False (0). 

Example 

A = POINT (3, 40) 

If point (3, 40) has been set, then A has the value of -1 . Otherwise A has the value of 
0. 
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CHAPTER 8 
SPECIAL FEATURES 



8.1 INP (port-number) 

Input a 8-bit value from the specified port. The Video Genie System is capable of 
handling 256 ports, numbered from to 255. Usually this function is used only 
when the expansion box is installed. 

Example 

IS fi = INP <124> 



This will input an 8-bit value from port 1 24 and assign it to variable A. 



8.2 OUT port-number, value 

Output an 8-bit value to the specified port. This statement requires two arguments: 
port-number and the value. The Video Genie System is capable of handling 256 
ports, numbered from to 255. 

Example 

20 OUT 14, 246 

Output the value 240 to port 14. Both arguments are limited to single byte values, 
that is 0-255. 

8.3 PEEK (address) 

This function returns the 8-bit value stored at the specified decimal address in the 
computer's memory, and displays the value in decimal form. The value will be 
between 0-255. 
Example 

20 B = PEEK (30000) 
Returns the value stored at location 30000 and assign that value to the variable B. 
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8.4 POKE address value 

This statement sends a 8-bit value to the specified (decimal) memory address 
location. It requires two arguments: address and value. The value must be between 
0-255. 
Example 

10 ft = 250 

28 POKE 19600, fl : REM SEND VALUE OF ft TO ADDRESS 15000. 

30 B = PEEK (19000) : REM RETURNS VALUE AT ADDRESS 19000 TO B 

40 PRINT "THE RESULT IS:";B 

50 END 

REflDV 

>RUN 

THE RESULT IS: 250 

8.5 MEM 

Returns the number of unused and unprotected bytes in memory. 

Example 

200 IF MEM < 183 THEN 70© 



When used as a command, it must be accompanied with the PRINT command. That is 
PRINT MEM, to find out the amount of memory not being used to store program, 
variables, strings, arrays, etc. 
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APPENDIX A 



Video Genie System Reserved Words* 



Z'? ABS 
llo AND 

.; u asc 
zr? ATN 
2 'f/ CDBL 
/42CHRS 
?if CINT 

'^ CLEAR 
'66 CLOSE 
< r 5Z CLS 
-^ CONT 
?Z£ COS 
'3£ DATA 
DEFDBL 
/76^/jbDEFFN 
'5* DEFINT 
/Sy DEFSNG 
'*S DEFUSR 
'^DEFSTR 

'&Z DELETE 
i$Z DIM 



/O 



EDIT 



v ■ ELSE 
i ■:■ END 
/^ ERL 

'^ERR 
/Si ERROR 

S/77EXP 
(<*/ FIX 
/?? FOR 
?J8 FRE 

.'<# GET 



'y<r GOSUB 

IH1 GOTO 

yV3 IF 

2c/ INKEYS 

W INP 

'5? INPUT 
/?HNSTR 

2 It INT 
/?» KILL 

Z-W LEFTS 
IVo LET 
1?/ LSET 
ZW3LEN 
/«. LINE 
'goLIST 
^-7 LOAD 
toMEM 
KbMID$ 
16 ? NAME 
'2? NEW 
/ 3? NEXT 

*°S>NOT 

/// ON 

/6o OUT 

Zt? PEEK 

/£? POINT 

#?POKE 

2/f POS 

-'?£ PRINT -.- 

f(-r put 



*None of these words can be used inside a variable name. 



'Zf RANDOM 
' 52 READ 
/$/? REM 
fSc) RESET 
A-^ RESTORE 
G? RESUME 
/^RETURN 
/^RIGHTS 
Z?2 RND 
iS-f SET 
?K"SGN 

^ ■',; sin 

ll\ SQR 
to^ STEP 
m STOP 

/& STRINGS 
dVi STRS 

'fig TAB f 

???TAN 
fcZTHEN 
^ ! TROFF 
/SO TRON 
m USING 

/?3USR 
2v?VAL 

;f? varptr 



+rt?+m 



// 
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APPENDIX B 



ERROR CODES 






CODE 


ABBREVIATION 


ERROR 


1 


NF 


NEXT without FOR 


2 


SN 


Syntax error 


3 


RG 


Return without GOSUB 


4 


OD 


Out of data 


5 


FC 


Illegal function call 


6 


OV 


Overflow 


7 


OM 


Out of memory 


8 


UL 


Undefined line 


9 


BS 


Subscript out of range 


10 


DD 


Redimensioned array 


11 


/o 


Division by zero 


12 


ID 


Illegal direct 


13 


TM 


Type mismatch 


14 


OS 


Out of string space 


15 


LS 


String too long 


16 


ST 


String formula too complex 


17 


CN 


Can't continue 


18 


NR 


NO RESUME 


19 


RW 


RESUME without error 


20 


UE 


Unprintable error 


21 


MO 


Missing operand 


22 


FD 


Bad file data 



Cf?R/ 
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Explanation of Error Messages 

NF NEXT without FOR: NEXT is used without a matching FOR statement. This error 
may also occur if NEXT variable statements are reversed in a nested loop. 

SN Syntax Error: This is usually the result of incorrect punctuation, open parenthesis, 
an illegal character or a mis-spelled command. 

RG RETURN without GOSUB: A RETURN statement was encountered before a 
matching GOSUB was executed. 

OD Out of Data. A READ or INPUT # statement was executed with insufficient data 
available. DATA statement may have been left out or all data may have been read 
from tape of DATA. 

FC Illegal Function Call: An attempt was made to execute an operation using an illegal 
parameter. Examples: square root of a negative argument, negative matrix dimension, 
negative or zero LOG arguments, etc. Or USR call without first POKEing the entry 
point. 

OV Overflow: A value input or derived is too large or small for the computer to handle. 

OM Out of Memory: All available memory has been used or reserved. This may occur with 
very large matrix dimensions, nested branches such as GOTO, GOSUB, and FOR- 
NEXT Loops. 

UL Undefined Line: An attempt was made to refer or branch to a non-existent line. 

BS Subscript out of Range: An attempt was made to assign a matrix element with a sub- 
script beyond the DIMensioned range. 

DD Redimensioned Array: An attempt was made to DIMension a matrix which had 
previously been dimensioned by DIM or by default statements. It is a good idea to 
put all dimension statements at the beginning of a program. 

/O Division by Zero: An attempt was made to use a value of zero in the denominator. 

ID Illegal Direct: The use of INPUT as a direct command. 
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TM Type Mismatch: An attempt was made to assign a non-string variable to a string or 
vice-versa. 

OS out of Siring Space; The amount of string space allocated was exceeded. \ 

LS String Too Long: A string variable was assigned a string value which exceeded 255 
characters in length. 

ST String Formula Too Complex: A string operation was too complex to handle. Break 
up the operation into shorter steps. 

CN Can't Continue: A CONT was issued at a point where no continuable program exists, 
e.g. after program was ENDed or EDITed. 

NR NO RESUME: End of program reached in error-trapping mode. 

RW RESUME without ERROR: A RESUME was encountered before ON ERROR GOTO 
was executed. 

UE Unprintable Error: An attempt was made to generate an error using an ERROR 
statement with an invalid code. 

MO Missing Operand: An operation was attempted without providing one of the required 
operands. 

FD Bad File Date: Data input from an external source (i.e. tape) was not correct or was 
in improper sequence, etc. 
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APPENDIX C 

Control Codes: 1-31 



HOcf 






5££^ 



Code 



f f BREAK 



8 



<? M 



Li 
10-13 to (T 

14 

15 

16-22 

23 



x 24 
"' 25 

n 26 

£3 27 
fc 28 

J^29 

f£30 
^ 31 



sL J^- 







Function 



Backspaces and erases gg H fi 
current character 

None 



I A/Etf LWfc" I 



u 



Carriage returns 

Turns on cursor 

Turns off cursor 

None 

Converts to 32 character 
mode 

Backspace-*- Cursor 

Advance -*- Cursor 

Downward | linefeed 

Upward f linefeed 

Home, return cursor to 
display position (0,0) 

Move cursor to beginning 
of line 

Erases to the end of the line 

U hCi^fW^A^) Clear to the end of the frame 



m 




1 ft 



lr 



0\<\)>J*<J- ' )ic / vv\ , n 



R w 



'/f 



i'-^~* 






c^ 



v/-..,:-J. 

- f 



J/ 



/" f. 



rp^zg) 



- <e 



■fu 






t: R \/ 



Flf 



T'oi^ 



ioi>e- CuV~^crr~ 



■•-■ i/M iM L L^i ^ 



OL/^-pW-^ p 6'^-^crXU\. 
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ASCII Character Codes 32-128 



IX) 



Code 



V 


32 


\ 


33 




34 


^ 


35 


'■-■ 


36 


r 


37 


■> 


38 




39 


C 


40 


Q 


41 


/- 


42 




43 




44 




45 




46 




47 




48 




49 




50 


3 2 


51 




52 


3C 


53 


"l& 


54 


J J 


55 


: £ 


56 


"9 


57 


■ .' /■ 


58 


3is 


59 


3c 


60 


3d 


61 


3c 


62 


-St 


63 


4(7 


64 



?? J - 



r . 



Character 

space 

t 



# 

$ 
% 
& 

( 

* 



< 

> 

? 

k 



(j^ 






7-F 



fcc- 



?p 



Code 

65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
84 
85 
86 
87 
88 
89 
90 
91 
92 
93 
94 
95 
96-127 
128 



Character 

A 

B 

C 

D 

E 

F 

G 

H 

I 

J 

K 

L 

M 

N 

O 

P 

Q 
R 

S 
T 
U 
V 

' w 

X 
Y 
Z 

c 

\ 
J 

A 

- &tk -«,.- 
Lower case for 
codes 64-95 
Space 



{ J\ \7.Z SO 

ft \io- %l 
it] \%h W 



B. st 






[i( 136 
Si" 



,4'- 



r? 






j£ i c iZ '£ 



Cm ? ( 



3)# ^ 






'W> £30 ig^f a*e 






iO ^ 



*3-h a: 



I it 






10 

as 



71. A, 



l<* <& fig/y? A 






,'96 9c 
1^ V B;* 5 



JJ/6A A/ 



fr 3 ! 



EL/ ^'' 






* 5 ^ R^ W 



nd 



f^ 









mio 



<& m 






1* 
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APPENDIX D 

Program Limits and Memory Overhead 
Ranges 

Integers -^32768 + 32767 inclusive 

Single Precision -1.70141 IE + 38 to + 1.70141 IE + 38 inclusive 

Double Precision -1.70141 1834544556E + 38 to + 1.70141 1834544556E + 38 inclusive 

String Range: Up to 255 characters 

Line Numbers Allowed: to 65529 inclusive 

Program Line Length: Up to 255 characters 

Memory Overhead 

Program lines require 5 bytes minimum, as follows: 

Line Number — 2 bytes 

Line Pointer — 2 bytes 

Carriage Return - 1 byte 

In addition, each reserved word, operator, variable name, special character and constant 
character requires one byte. 

Dynamic (RUN-time) Memory Allocation 

Integer variables: 5 bytes each 

(2 for value, 3 for variable name) 

Single-precision variables: 7 bytes each 

(4 for value, 3 for variable name) 

Double-precision variable: // taie* e^ck 

(8 for value, 3 for variable name) 

String variables: 6 bytes minimum 

(3 for variable name, 3 for stack and variable pointers, 1 for each character) 

Array variables: 1 2 bytes minimum 

(3 for variable name, 2 for size, 1 for number of dimensions, 
2 for each dimension, and 2,3,4, or 8 [depending on array type] 
for each element in the array) 

Each active FOR-NEXT loop requires 16 bytes. 

Each active (non-returned) GOSUB requires 6 bytes. 

Each level of parentheses requires 4 bytes plus 12 bytes for each temporary value. 85 



APPENDIX E 



VIDEO DISPLAY MAP 
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TA 

PRINT 
AT 

t 


a-*- 


1 


2 3 


4 « 


> 6 7 


8 9 1 


11 


12 


\ 15 


I 14 


\ 1S 


M€ 


i 17 


'18 


19 


2C 


)21 


2! 


>2C 


J 24 


t25 


26 


27 


'28 


25 


>3( 


)31 


32 


>3C 


\3* 


135 


3i 


>37 


3* 


J 39 


>4C 


)41 


4; 


>43 


4<! 


14; 


>46 47 


48 49 


150 51 


52 53 54 55 


56 57 


58 59 60 


61 62 63 




X*- 


3 12 3 


4 5 6 


r a 


i 

9 


1111 

12 3 4. 


11112 
> 6 7 89 


2 2 2 

1 23 


2 

4 


i 2 ; 

5 6 ■ 


l 2 

T 8 « 


l 3 , 
i 


j 3 ; 

2 : 


) 3 ; 
j 4 ; 


J 3 3 
5 6 7 


3 3 
89 


4 4 

01 


\ 4 < 

2 ; 


1 4 < 
J 4 ! 


t 4 < 

> 6 


1 4 ' 


II 


5 

1 


5 
2 


5 

3 


5 ! 
4 ! 


> 5 
i 6 


5 

7 


5 I 
8< 


> 6 ( 

> 01 


i 6< 

2 : 


> 6< 
I 4 ! 


> 6 ( 

> 6 " 


S 6 < 
' 8 * 


5 7 

i 


7 

1 


7 " 

2 : 


r 7 

J 4 


7 
5 


7 
6 


7 7 ' 

r a < 


) 5 


'J 


I 


81 
4 ! 


i 8 
> 6 


8 
7 


8 ( 
8 < 


» 9< 
> 


» 9 
2 


9 
3 


9 

4 


9 
5 


9 
6 


9 

7 


9 
8 


9 
9 


i 1 



£ 1 


1 1 

00 

2 3 


1111111 

00 Q 1 
4 5 6 7 8 9 


1 

1 
1 


i 
i 

2j 


1 1 1 
1 1 1 
3 45 


1 

1 

6 


1 1 
1 i 

7 8 


1 1 
1 2 
9 


1 
2 

1 


111111 

2 2 2 2 2 2 
2 3 4 5 6 7 
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Four more BASIC commands should be included in the instruction set Thev 
are(l) INKEY$, (2) POS, (3) USR and (4) VARPTR. 



ADDENDUM 



fl) INKEYS 

Returns a one-character string determined by an instantaneous input from the 
keyboard. If no key is^pressed during the execution of this statement, a null string 
is returned. 

Characters typed to an INKEYS are not automatically displayed on the screen. 


Example: 

16 REM * ENTER A PASSWORD WITHOUT 
20 REM * DISPLAY I NG IT ON THE SCREEN 
26 CLS 
40 PRINT "INPUT A PASSWORD " 

50 R$=4NKE¥$: IF fl*="0" THEN 68 ELSE 58 
68 B$=INKEV$: IF- B$="K" THEN 78 ELSE 68 
78 PRINT "WELCOME ! i ! " 


(2) POS (dummy argument) 

The computer returns a number from to 63 indicating the current cursor 
position on the display. Usually, is used for the dummy argument. 


Example: 

180 fl=P0S(8> 


(3) USR (argument) 

Calls a machine language subroutine and passes the argument to the subroutine. 
Such a subroutine could be loaded from tape or created by POKEing Z80 machine 
code into the memory. Users who are not familiar with machine language programming 
are not recommended to use this command. 

The subroutine entry address should be POKEd into location 16526 - 16527. 
The least significant byte should' be in location 16526. 

To pass the argument to the subroutine, the subroutine should immediately 
execute a CALL OA7FH (call 2687 dec). The argument will then be placed in 
registers HL. (cD^o/0 

To return to your BASIC program without passing any value back, a RET 
instruction should be executed. 

To return a value, load the value into the HL register pair as a two-byte signed 
integer and execute a JP OA9AH instruction. (OA9lift =2714 Decimal) 

USR routine reserves 8 stack levels for the users' subroutine. 


Example: 

18 INPUT IE : REM * INPUT ARGUMENT * 

15 REM * PREPARE ENTRY ADDRESS + 

28 POKE 16526,8 :PGKE 16527,126 

38 fl=USRUKJ : REM * RETURN ARGUMENT A * 

iv - -9 - ff f-\., 

& C ; ] ':C -■- ^r" '■-<. 



The subroutine should place on top of the memory map. To protect that region 
of memory, the user should input the highest memory location available for his BASIC 
program storage when the machine asks READY? at power up. 



(4) VARPTR (variable name) 

An address - value of the variable name will be returned. 

If K is the returned address, the variables will be stored in the following 
structures :- 

(i) 2 - byte integer 

K - LSB 3Z^G> ^ c ^2^Ct 

K + 1 - MSB 

(ii) single precision variable 
K - LSB 

K + 1 - Next MSB f,^' L Mf O ^ s« -^ t 9,v o^ g ■; ug t 



K + 2 - MSB 

K + 3 - Exponent value 

(iii) double precision value 
K - LSB 
K + 1 - Next MSB 



K + 6 - MSB 

K + 7 - Exponent value 



(.^ ! 



(iv) string variable 

K - length of string 

K + 1 - LSB of string starting address. l^ r/-Me 

K + 2 - MSB of string starting address. 
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13 


CLEAR 


45 


LET 


47 


NEWLINE - 


record all changes 




CLEAR 


14 


DATA 


39 


LPRINT 


60 


SPACEBAR - 


move cursor one space to the right 




CLOAD 


15 


DEFDBL 


44 


ON n GOSUB 


52 


BACKSPACE - 


move cursor back to the left 




CLOAD? 


15 


DEFINT 


43 


ON n GOTO 


50 


SHIFT-ESC - 


escape from Insert command 




CONT 


15 


DEFSNG 


44 


ON ERROR GOTO 


50 


H 


hack and insert 




CSAVE 


16 
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45 


PRINT 


28 


I 


insert 
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45 
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X 


insert at end of line 
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L 


list line 
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cancel all editing changes 
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PRINT* 


41 


E 


save all editing changes 
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17 
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50 


READ 


39 


Q 


back to Active Command level with no change 


RUN 


17 


GOTO 


49 


RESTORE 


40 
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delete 




SYSTEM 
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IF THEN ELSE 59 


RETURN 
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C 


change 
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* 
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57 


S 


search 




TRON 
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♦explained in ADDENDUM 
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